timethese( 1000000, { 'pack' => q{my $str = 'hello'; $str = pack("A10",$str); }, 'sprintf' => q{my $str = 'hello'; $str = sprintf("%-10s",$str);}, });