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

##</code><code>##

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; }
if (1) { $foo = "perl" x 1000000;  sleep 5; }
if (1) { $foo = "perl" x 1000000;  sleep 5; }