摘要:
89 open FILE, "< file_4_ex_ch7.txt" 90 or die "cannot open file: $!"; 91 my $lines = join '', <FILE>; 92 print $lines."\n"; 93 $lines =~ s/^/file_4_ex 阅读全文
posted @ 2019-07-03 11:18
books2read
阅读(211)
评论(0)
推荐(0)
摘要:
Perl:只是把“^”作为匹配的单字:只是匹配每一行的开头 $lines =~ s/^/file_4_ex_ch7.txt: /gm; 阅读全文
posted @ 2019-07-03 11:17
books2read
阅读(317)
评论(0)
推荐(0)
浙公网安备 33010602011771号