use strict 'refs';
my(@l) = ('10', '20', '30');
;
my $i += $_ foreach (@l);
my $t;
;
$t += $_ foreach (@l);
print '$t = ' . $t . "\n";
print '$i = ' . $i . "\n";