System Functions Perl

print "\nRandom integers produced by 1 + int( rand( 6 ) ):\n";
for ( 1 .. 3 ) {
   print "   ", 1 + int( rand( 6 ) ), "\n";
}