#! 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