print "Welcome to the Exponentiator!\n"; print "Enter a number: "; while ($s = <>) { print "\n"; print " $s"; print "e = " . exp($s) . "\n"; print "Enter a number: "; }