sub x{ my $y; sub z{ say $y; } };; Variable "$y" will not stay shared at ...