Select Code to Download

foreach 1..6 { my $foo = "perl" x 1000000;  sleep 5; }

my $foo;
if (1) { $foo = "perl" x 1000000;  sleep 5; }
...
if (1) { $foo = "perl" x 1000000;  sleep 5; }
if (1) { $foo = "perl" x 1000000;  sleep 5; }
if (1) { $foo = "perl" x 1000000;  sleep 5; }