diff options
| -rw-r--r-- | lib/vars.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/vars.pm b/lib/vars.pm index 334af9630a..ca2a08dcf6 100644 --- a/lib/vars.pm +++ b/lib/vars.pm @@ -14,7 +14,7 @@ sub import { my ($pack, @imports, $sym, $ch) = @_; foreach $sym (@imports) { ($ch, $sym) = unpack('a1a*', $sym); - if ($sym =~ tr/A-Za-Z_0-9//c) { + if ($sym =~ tr/A-Za-z_0-9//c) { # time for a more-detailed check-up if ($sym =~ /::/) { require Carp; |