A perl scripot that selects a random number between 1 and 100 and guides a a user to it