lihu129c 发表于 2015-12-26 09:32:00

perl学习1

  #/usr/bin/perl -w   
$count=0;
while ($count<10){
      $count+=2;
      print "count is now $count\n";
}
  在终端输入$perl per1.pl即可求得10以内的奇数的和;-w表示提示警告 #!/usr/bin/perl表示perl的路径,也可写为#!/usr/bin/env perl 让系统自己查找perl的路径
页: [1]
查看完整版本: perl学习1