Select Code to Download

printf '<%s>', $element->{name};

print "<$_>" for $element->{name};

use strict;
use Benchmark ':all';
...
             Rate    printf print_for
printf     7663/s        --      -79%
print_for 36765/s      380%        --