Select Code to Download

> cat - >1.pl
1
...
Total value for the 3.pl : 3
Total value accumulated from all the files
is:6>

foreach my $file (@ARGV)
{
...
    print "Total value for the $file : $sum\n";
    close( FILE );
}