foreach的運(yùn)算結(jié)果不能做為子程序的返回值嗎？

mxl913721

各位大蝦，小弟剛學(xué)perl，碰到個(gè)問(wèn)題，查了一下午沒(méi)查到根本原因，求指導(dǎo)..

看程序：

my @array = qw(1 3 5 7 9);
my $array_total = total(@array);

print "The total of \@array is: $array_total\n";

sub total{
    my $sum;
    foreach my $num (@_){
        $sum += $num;
    }
}

這樣子死活打印不出值來(lái)，不是說(shuō)子程序的最后一條語(yǔ)句即為返回值嗎，這里的最后一條語(yǔ)句不是指的foreache最后一次的循環(huán)嗎？$sum最后怎么沒(méi)返回呢？？

當(dāng)我在total子程序最下面加了一條$sum的時(shí)候，可以正確返回：
sub total{
    my $sum;
    foreach my $num (@_){
        $sum += $num;
    }
    $sum;
}


問(wèn)題來(lái)了，foreach的運(yùn)算結(jié)果難道不能做為子程序的返回值嗎？？

求大俠指導(dǎo)~~

kk861123

似乎在哪看過(guò)一個(gè)這樣問(wèn)題的帖子，樓主再分析一下子程序的最后一條語(yǔ)句真的是這個(gè)嗎？

1. $sum += $num;

復(fù)制代碼

laputa1973

http://72891.cn/forum.p ... ;page=1#pid22223984
剛挖過(guò)墳。。。。

cdtits

貌似最后執(zhí)行的是：

1. foreach my $num (@_)

復(fù)制代碼

mxl913721

回復(fù) 3# laputa1973

哈哈，謝謝大家的關(guān)注。找到原因了：
If the last statement is a loop control structure like a "foreach" or a "while", the returned value is unspecified. The empty sub returns the empty list.

唉，中文版的《perl語(yǔ)言入門》里沒(méi)說(shuō)這個(gè)- -

他這個(gè)是指循環(huán)控制語(yǔ)句的話返回空列表？感覺(jué)好像不是很準(zhǔn)確。。

“返回值是不確定的�？誷ub返回空列表”？？

空sub是？？？



   

mxl913721

If the last statement is a loop control structure like a "foreach" or a "while", the returned value is unspecified. The empty sub returns the empty list.

哦，這個(gè)The empty sub returns the empty list.應(yīng)該跟前面的那句沒(méi)關(guān)系的。。。

就是說(shuō)指循環(huán)控制語(yǔ)句的返回值是未指定的吧。

xiyoulaoyuanjia

the returned value is unspecified  

蚊仔perlperl

學(xué)習(xí)到了。