in reply to Perl debugger variable completion crashing debugger
@@ -9385,7 +9385,7 @@ If the package is C<::> (C<main>), create an emp +ty list; if it's something else, =cut push @out, map "$prefix$_", grep /^\Q$text/, - ( grep /^_?[a-zA-Z]/, keys %$pack ), + ( grep /^_?[a-zA-Z]/, do { no strict 'refs'; keys %$pack } +), ( $pack eq '::' ? () : ( grep /::$/, keys %:: ) ); =item *
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Perl debugger variable completion crashing debugger
by HayoBaan (Initiate) on Apr 15, 2015 at 07:18 UTC |