首页  >  文章  >  微信小程序  >  Perl入门小程序分析

Perl入门小程序分析

高洛峰
高洛峰原创
2017-03-24 14:04:111829浏览

这篇文章介绍Perl入门小程序分析

#!/usr/bin/perl -w
#output the largest number from a file
$max_number = &max(3,5,10,4,6) ;
sub max
        {
        my($max_sofar_number) = shift @_ ;
        foreach (@_)
                {
                        if($_ > $max_sofar_number)
                                {
                                        $max_sofar_number = $_ ;
                                        }
                        }
        $max_sofar_number ;
        }
print "The largest number is $max_number \n";

以上代码是计算多个数的最大数,感觉和C的写法简单了不少,真乃浓缩的是精华..

以上是Perl入门小程序分析的详细内容。更多信息请关注PHP中文网其他相关文章!

声明:
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn