16:51 >perl 1112_SoPW.pl
Enter a number (0 to quit): 57.6
57.600000 squared is 3317.760000
Enter a number (0 to quit): .00211
0.002110 squared is 0.000004
Enter a number (0 to quit): 12
12.000000 squared is 144.000000
Enter a number (0 to quit): 0
Bye!

16:52 >