Help for this page

Select Code to Download


  1. or download this
    --8<---
    use strict;
    ...
             Rate  split csv_xs
    split  1.60/s     --   -27%
    csv_xs 2.21/s    38%     --
    
  2. or download this
    my @data = ("aaaaa") x 10;
    my $line = join "\t" => @data;
    ...
           s/iter csv_xs  split
    csv_xs   3.74     --    -5%
    split    3.55     5%     --