(view source code of random.pl as plain text)
#! perl
# Random.pl, Version 1.00
# Display random number using Perl
# Written by Rob van der Woude
# http://www.robvanderwoude.com
# Initialize rand()
srand
# Display random interger between (and including) 1 and 100
print int( rand( 100 ) ) + 1
page last modified: 2024-04-16; loaded in 0.0173 seconds
