Help for this page

Select Code to Download


  1. or download this
    my $i = 0;
(chomp $_->[1], $_->[2] = $i++) for @multi_array;
  2. or download this
    print join(",", @{$_}),"\n" for (@multi_array);

4.20064619e-03, 5.30384531e+04,91
4.24680719e-03, 5.28570000e+04,92
...