摘要： 1 cat 1.txt 2 11111111111111111111111111111111111 3 kllk 4 nciuwbufcbew``````//.]];s[[..; 5 klklkl 6 7 x,dsncdk,;l,ex 8 xw,eocxmcmck 9 11111111111111111111111111111111111 10 11 perl -p -i.... 阅读全文

摘要： 问题： 1 cat 1.txt |perl test.pl 后并无备份文件1.txt.bak？ 阅读全文

摘要： 1 #!/usr/bin/perl 2 3 use strict; 4 use warnings; 5 6 $_=' 7 8 $$ oinn &&& 9 ninq kdownc 10 aninp 11 kkkk'; 12 13 if (/(.*)k\Z/){print "$1\n";}else{print "no match\n";} 14 ... 阅读全文