Help for this page

Select Code to Download


  1. or download this
    #! perl -slw
use strict;
...
my @doubled = double @cleaned;
print for @doubled;
printf 'Check mem.'; <STDIN>;
  2. or download this
    #! perl -slw
use strict;
...
double( \@data );
print for @data;
printf 'Check mem.'; <STDIN>;
  3. or download this
    perl -nlwe" m[s*(\S+)\s*] and print $1*2" data\1millionlines.dat