my $tot = sprintf "%lf\n", ($ARGV[0]/$ARGV[1]); #### my $tot = sprintf "%f\n", ($ARGV[0]/$ARGV[1]);