sub f { my $x; sub hidden {$x} }