sub a {
    my $x;
    sub b { $x }
}