Script started on Tue Jul  5 12:28:40 2005
[4mmath-cs[m:[1m~/web/perl[0m> 
[4mmath-cs[m:[1m~/web/perl[0m> perl horner.pl
What number do you want the square root of by Horner's method? 20
 1    1 
 2    4 
 3    9 
 4    16 
 5    25 
 4.1    16.81 
 4.2    17.64 
 4.3    18.49 
 4.4    19.36 
 4.5    20.25 
 4.41    19.4481 
 4.42    19.5364 
 4.43    19.6249 
 4.44    19.7136 
 4.45    19.8025 
 4.46    19.8916 
 4.47    19.9809 
 4.48    20.0704 
 4.471    19.989841 
 4.472    19.998784 
 4.473    20.007729 

The square root of 20
 is 4.472 by Horner's method. 

[4mmath-cs[m:[1m~/web/perl[0m> ^Dexit

Script done on Tue Jul  5 12:28:56 2005