my $padded=sprintf("%08.3f",39.452);