for my $k (do { no strict 'refs'; keys %{'Other::'}}) { say $k; } [download]
In reply to Re: peek_sub but with package vars by choroba in thread peek_sub but with package vars by LanX