Mega Code Archive

 

Categories / Perl / System Functions

 

Random integers produced by 1 + int( rand( 6 ) )

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