Select Code to Download

# Let's see how much money I would have if I just won the
# lottery and found a 2 pound coin in the couch cushions...
...
How many £50 notes do you have? 0
You have £2.
# Hmm, guess I won't spend my £2 on a lottery ticket then...

#!/usr/bin/perl -w
use strict; use warnings;
...
) );
sub ask { print "How many $_[0] do you have? " ; <STDIN> * $_[1] }