my $discard = <$fh> for 1 .. 1; # $discard no longer in scope here.