Help for this page
my $sum; foreach my $x(@a) { ... $sum +=$x; } }
fun_a($x) && fun_b($x) &&.....&&fun_z($x)