my $foo;

    sub closure { $foo }
    sub not_closure { 1 }