#!/usr/bin/perl
print "Hello perl World. \n";
print "1 kara 10 made no wa wo motomeru \n";
$sum=0;
for($num=1;$num<11;$num++){
   $sum+=$num;
   print "$num made no wa ha $sum \n";
}
print "1 kara 10 made no wa ha $sum \n";
exit;