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