print "Enter your first number:\n ";
$number=<STDIN>;
chomp $number;