$filename = "cmd.bat";
open FILE, $filename
or die "Can’t open ‘$filename’: $!"; my $lines = join '', <FILE>;
$lines =~ s/^/$filename: /gm;
print $lines;
请问join后面跟文件句柄是什么意思,''又是什么意思?
...全文
2143打赏收藏
perl join
$filename = "cmd.bat"; open FILE, $filename or die "Can’t open ‘$filename’: $!"; my $lines = join '', ; $lines =~ s/^/$filename: /gm; print $lines; 请问join后面跟文件句柄是什么意思,''又是什么意思?