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