logging: Check if typescripts with a similar name already exist
[sunny256-utils.git] / perldeboff
blob92dc1c9312a5604ac733c39101b27dec2519b026
1 #!/usr/bin/env perl
3 # perldeboff
4 # File ID: 13dbcd36-5d42-11df-9dfc-90e6ba3022ac
5 # Kommenterer ut debuggingsmeldinger i Perl
7 while (<>) {
8 s/(&deb_pr\(__LINE__)/# $1/g;
9 print;