Mega Code Archive

 

Categories / Perl / System Functions

 

Using exp function

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: "; }