Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
 my @aap = map { $_ * $_ } ( 0 .. 100000 );
}
sleep 300;
  2. or download this
    #!/usr/bin/perl
use strict;
...
$0 = "highmemusage_staying_in_scope";
my @aap = map { $_ * $_ } ( 0 .. 100000 );
sleep 300;
  3. or download this
    #!/usr/bin/perl
use strict;
# case 3: use as baseline mem usage of your perl
$0 = "reference";
sleep 300;