diff options
Diffstat (limited to 'lib/Symbol.pm')
| -rw-r--r-- | lib/Symbol.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Symbol.pm b/lib/Symbol.pm index a12e6dcb30..c266d64373 100644 --- a/lib/Symbol.pm +++ b/lib/Symbol.pm @@ -73,7 +73,7 @@ sub ungensym ($) {} sub qualify ($;$) { my ($name) = @_; - if (! ref($name) && $name !~ /::/) { + if (!ref($name) && index($name, '::') == -1 && index($name, "'") == -1) { my $pkg; # Global names: special character, "^x", or other. if ($name =~ /^([^a-z])|(\^[a-z])$/i || $global{$name}) { |