perl 习题答案疑问

chunjiahua · 发表于 2013-7-20 15:31:30

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？注册

x

小骆驼这本书上面有个答案看不懂，感觉不对。。。

写一个程序，用户能输入1个字符串和一个数字(n)（不在同一行）。输出为，n行这个字符串，1次1行（提示，使
用“x”操作符）。例如，如果用户输入的是“fred”和“3”,则输出为：3 行，每一行均为fred。如果输入为“fred”和
“299792”,则输出为299792行，每一行均为fred。

print "Enter a string: ";
$str = <STDIN>;
print "Enter a number of times: ";
chomp($num = <STDIN>);
$result = $str x $num;
print "The result is:\n$result";

The result is: fred
fred
fred
搞不懂呀

wys093 · 发表于 2013-7-21 08:59:06

print "Enter a string: ";
$str = <STDIN>;
chomp($str); #加上这一行就ok了！如果没有这一行，你的每个fred都会带一个会换行，就像你之前看到的
print "Enter a number of times: ";
chomp($num = <STDIN>);
$result = $str x $num;
print "The result is:\n$result";