Perl：标量数据-练习5

练习5. 写一个程序，用户能输入1个字符串和一个数字n，不在同一行。输出为n行这个字符创，1次1行。

sourcecode1:

#!/usr/bin/perl -w

 

print "please input string:\n";

$str=<STDIN>;

print "please input number:\n";

chomp ($num=<STDIN>);

$out=$str x $num;

print "$out\n";

sourcecode2:

#!/usr/bin/perl -w

 

print "please input string:\n";

chomp ($str=<STDIN>);

print "please input number:\n";

chomp ($num=<STDIN>);

$i=0;

while($i<$num){

print "$str\n";

$i++;

}

note:
1. 字符串操作符
a. .操作符：用来串联字符串，或者说字符串的连接。
b. x操作符：字符串重复操作符。意思是把左边字串重复右边那么多次。右边表示的是重复的次数。sourcecode1中使用了这个操作符。
2. while控制结构 while(){}
a. 括号中是条件语句，先判断，后执行。
b. 条件语句的真假判断和if语句一样