$|++;
print "Enter a number:  "; 
$number = <STDIN>; 
print "You entered $number";