diff options
Diffstat (limited to 'dist/Safe')
| -rw-r--r-- | dist/Safe/Safe.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dist/Safe/Safe.pm b/dist/Safe/Safe.pm index 3ca164225e..2cd6259576 100644 --- a/dist/Safe/Safe.pm +++ b/dist/Safe/Safe.pm @@ -67,7 +67,7 @@ require utf8; # particular code points don't cause it to load. # (Swashes are cached internally by perl in PL_utf8_* variables # independent of being inside/outside of Safe. So once loaded they can be) -do { my $a = pack('U',0x100); utf8->import; require 'utf8_heavy.pl' if $] < 5.031006 }; +do { my $a = pack('U',0x100); utf8->import; require 'utf8_heavy.pl' if "$]" < "5.031006" }; # now we can safely include utf8::SWASHNEW in $default_share defined below. my $default_root = 0; |