Perl Example
1. 安装perl,选择自己喜欢的IDE,尝试运行一个简单的小程序。例如打印Helloworld之类的。 print "Hello World"; 2. 写一个程序,计算园的周长,让它提醒用户键入半径的长度。 print "In orde to calculate perimeter, please input radius: "; chomp($radius=<STDIN>); $Perimeter=$radius * 3.14 * 2; print "The Perimeter is: $Perimeter"; 3. 写一个程序,提醒用户键入两个数字(分两行键入),然后输出两者的乘积。 print "Please input 2 number, one line one number: "; @input=<STDIN>; $a=$input[0]; $b=$input[1]; $c=$a*$b; print "The result is: $c"; 4. 写一个程序,读入一些数字(每行一个),直到文件结尾为止。然后,根据每一个数字输出如下名单中相应的人名。比方说,如果输入数字为1、2、4和2,那么输出的人名将会是fred、betty、dino和betty。 名单:fred betty barney dino wilma pebbles bamm-bamm @input=<STDIN>; chomp(@input); $i=0; while($i <= $#input) { if ($input[$i]==1) {print "fred\n"; } elsif($input[$i]==2) {print "betty\n"; } elsif($input[$i]==3) {print "barney\n"; } elsif($input[$i]==4) {print "dino\n"; ...