repo.or.cz
/
sunny256-utils.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
パスワード生成スクリプト
[sunny256-utils.git]
/
perldeboff
blob
92dc1c9312a5604ac733c39101b27dec2519b026
1
#!/usr/bin/env perl
2
3
# perldeboff
4
# File ID: 13dbcd36-5d42-11df-9dfc-90e6ba3022ac
5
# Kommenterer ut debuggingsmeldinger i Perl
6
7
while
(<>) {
8
s/(&deb_pr\(__LINE__)/# $1/g
;
9
print
;
10
}