Question

perl的输出文件名

请教各位编程高手 现在遇到一个perl的问题
这个程序很简单 读入的文件是用户标准输入的文件 然后我想定义一个输出文件名 这个输出文件的名字为 输入文件的名字+out 本人初学perl 学的还不是很好 请各位高手指教

Answer 1

perl里面'.'（就是一个点）是用来连接字符串的。如果输入文件名为$input，那么输出文件名$output = $input.'.out' 当然你的输出文件叫什么名字都可以。比如：aaa.out

open FILE,'>aaa.out'; --这句话是用一个文件句柄指向你的输出文件
print FILE "blabla....";--这句话是把blabla...输出到aaa.out中
close FILE;--关闭文件句柄

Answer 2

用户输入读入的文件名就是
$ARGV[0]

输出文件名=输入文件的名字+out
$output=$ARGV[0]."out";

打开Perl文件,FILE为文件句柄，如果文件不存在，可以用来创立新文件
open FH,">$output";

输出
print FH "data...";

close FH;

Answer 3

用文件重定向符号 ">" 就能解决的吧?