perl练习

用户输入半径，输出圆的周长

print "please input r : \n";
$r = <STDIN>;
$pi = 3.1415;
$c = 2 * $r * $pi;
print "$c";

输入一个字符串和一个数字，重复这个字符串num次在num行中

$s = <STDIN>;
$num = <STDIN>;
#chomp($s);
$out = $s x $num;
print "$out"

的输入自带换行，因此直接拼接就可以，chomp函数去掉字符串末尾的换行

输入一个数组，倒序输出

linux 中ctrl + d代表键盘输入结束

@s = reverse(