diff options
Diffstat (limited to 'lib/dumpvar.pl')
| -rw-r--r-- | lib/dumpvar.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/dumpvar.pl b/lib/dumpvar.pl index 5427494485..03dbbcd8fe 100644 --- a/lib/dumpvar.pl +++ b/lib/dumpvar.pl @@ -8,7 +8,7 @@ sub unctrl { } sub main'dumpvar { ($package,@vars) = @_; - local(*stab) = eval("*_$package"); + local(*stab) = *{"::_$package"}; while (($key,$val) = each(%stab)) { { next if @vars && !grep($key eq $_,@vars); |