A random number 

my $i = rand(100);