use Test::More *; my $n =0; $n += $_ for 1..10; is($n, 55); done_testing();