my $x;
$x .= "a" for 1..1024;  # Process size goes up
undef $x;               # Process size doesn't go down
$x .= "a" for 1..1024;  # Process size doesn't go up