my %dp_numfmt;
$dp_numfmt{"dp$_"} = join( ".", "0", "0"x$_) for 0..5;