這篇文章介紹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 @_ ;## {
if($_ > ; $max_sofar_number)
$max_sofar } }
}
以上程式碼是計算多個數的最大數,感覺和C的寫法簡單了不少,真乃濃縮的是精華..
以上是Perl入門小程式分析的詳細內容。更多資訊請關注PHP中文網其他相關文章!