>perl -le"$result = 4.25 / 1200; print $result"
0.00354166666666667

##</code><code>##

$result = sprintf "%0.7f", 4.25 / 1200;
                   ^
                   |
                missing