要求：提示用户输入一个数n，和一个字符串。然后输出n行该字符串。

程序：
#! /usr/bin/perl
print "please input a number:";
$a=<STDIN>;
print "please input a character:";
$b=<STDIN>;
while ($n<$a) {
  print $b;
  $n+=1;
}