LinuxSir.cn,穿越时空的Linuxsir!

 找回密码
 注册
搜索
热搜: shell linux mysql
查看: 1417|回复: 0

怎么样来获取参数?

[复制链接]
发表于 2009-6-10 10:12:04 | 显示全部楼层 |阅读模式
刚开始学习perl,尝试例子程序.代码如下:
#!/usr/bin/perl
@number=<STDIN>;
$maximum=&max(@number);
sub max{
      my($max_so_far)=shift@_;
      foreach(@_){
        if($_>$max_so_far){
           $max_so_far=$_;
           }
}
$max_so_far;
}
print "the maximum number is $maximum!\n"
执行程序之后.你可以输入一些数字,然后取得这些数字中最大的哪个数是多少.输入用的是<STDIN>.想如果数字更多的话这样一个一个的输入很是麻烦,可不可以把想要比较的一些数字写入一个文件中,然后让程序自己读呢?先谢谢各位!
初学,多指点!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表