my $fmt = blank_formatter('%12.4f');
my_printf("%10s: %s %s %s %s\n", $rowname, 
          map {$fmt => $_} ($numcol1, $numcol2, $numcol3, $numcol4));