sub print_map_interp {
    print NULL map "$_\n", @array;
}

### RESULTS ###

Benchmark: running field sep, for, interp map, join, list map, map, each for at least 3 CPU seconds...
 field sep:  3 wallclock secs ( 3.09 usr +  0.05 sys =  3.14 CPU) @ 1176.75/s (n=3695)
       for:  3 wallclock secs ( 3.14 usr +  0.03 sys =  3.17 CPU) @ 814.63/s (n=2584)
interp map:  3 wallclock secs ( 3.09 usr +  0.02 sys =  3.11 CPU) @ 745.90/s (n=2319)
      join:  4 wallclock secs ( 3.05 usr +  0.17 sys =  3.22 CPU) @ 3680.02/s (n=11846)
  list map:  3 wallclock secs ( 3.00 usr +  0.02 sys =  3.02 CPU) @ 446.62/s (n=1347)
       map:  6 wallclock secs ( 6.19 usr +  0.17 sys =  6.36 CPU) @ 61.17/s (n=389)

Tool completed successfully