Perl 把变量当作文件来处理
在 Tcl 里,可以通过 refchan 把字符串当作文件来处理。在 Perl 里面怎么实现类似的功能呢?
Perl Open String as File
$text = "123\n456\n789";
open(STRING, ">", \$text);
while(<STRING>){
print $_;
}
close STRING;
在 Tcl 里,可以通过 refchan 把字符串当作文件来处理。在 Perl 里面怎么实现类似的功能呢?
$text = "123\n456\n789";
open(STRING, ">", \$text);
while(<STRING>){
print $_;
}
close STRING;