文章详情

  • 游戏榜单
  • 软件榜单
关闭导航
热搜榜
热门下载
热门标签
php爱好者> php文档>perl学习4--子程序中自动识别参数

perl学习4--子程序中自动识别参数

时间:2011-04-24  来源:孤独的猫

#!/usr/bin/perl -w
sub max{
  my($max_so_far) = shift @_;    #my后面用来声明私有变量,因为perl中默认都为公有变量,shift取列表的头元素,并删除头元素
  foreach (@_)  {
    if ($_ > $max_so_far) {
      $max_so_far = $_;
    }
  }
  $max_so_far;
}
$maximum=&max(3,5,10,4,6);
print "The max is $maximum\n";

相关阅读 更多 +
排行榜 更多 +
空中跑酷汉化版

空中跑酷汉化版

赛车竞速 下载
修仙传说

修仙传说

角色扮演 下载
魔界零之迷宫

魔界零之迷宫

冒险解谜 下载