990コメント309KB

Perlについての質問箱 45箱目

レス数が900を超えています。1000を超えると表示できなくなるよ。

0901デフォルトの名無しさん

2011/02/09(水) 17:52:38

sub add {
my$sum = 0;
$sum += ref $_ eq "ARRAY" ? add(@$_) : $_ foreach @_;
return $sum;
}

レス数が900を超えています。1000を超えると表示できなくなるよ。