sub mit_sprintf {
        return int(sprintf '%.15f', $_[0]);
}