perl 输入流问题 新手搞不懂了 求大神解惑

Question

#!/usr/bin/perl -w
print "input a number:";
chomp(my $line=);
print "input some string";
chomp(my @data=);
foreach(@data){
printf "%${line}s\n",$_;
}

我想要的是先输入一个数字,然后输入多行字符串,然后打印出来
为什么执行结果不对呢

Answer 1

#!/usr/bin/perl -w
print "input a number:";
chomp(my $line=<>);
print "input some string";
chomp(my @data=<>);
foreach(@data){
printf "%${line}s\n",$_;
}
输入完字符串后，linux下按再按回车（windows下按Ctrl+z），就可以打印输入的内容了。