Skip to content

Commit 23ae7f9

Browse files
JRaspassleonerd
authored andcommitted
Modernise the utf8 pragma a little
- Move the version declaration into the package line. - Use v5.40 to get strict, warnings, and the module_true feature.
1 parent 4913086 commit 23ae7f9

File tree

1 file changed

+2
-6
lines changed

1 file changed

+2
-6
lines changed

lib/utf8.pm

Lines changed: 2 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,17 +1,14 @@
1-
package utf8;
1+
package utf8 1.29;
22

33
# This file only defines the import/unimport subs, the rest are implemented by
44
# always-present functions in the perl interpreter itself.
55
# See also `universal.c` in the perl source
66

7-
use strict;
8-
use warnings;
7+
use v5.40;
98

109
our $utf8_hint_bits = 0x00800000;
1110
our $ascii_hint_bits = 0x00000010; # Turned off when utf8 turned on
1211

13-
our $VERSION = '1.28';
14-
1512
sub import {
1613
$^H |= $utf8_hint_bits;
1714
$^H &= ~$ascii_hint_bits;
@@ -21,7 +18,6 @@ sub unimport {
2118
$^H &= ~$utf8_hint_bits;
2219
}
2320

24-
1;
2521
__END__
2622
2723
=head1 NAME

0 commit comments

Comments
 (0)