diff options
Diffstat (limited to 'beagle/debian-rfs/usr/share/perl/5.10.1/utf8.pm')
| -rw-r--r-- | beagle/debian-rfs/usr/share/perl/5.10.1/utf8.pm | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/beagle/debian-rfs/usr/share/perl/5.10.1/utf8.pm b/beagle/debian-rfs/usr/share/perl/5.10.1/utf8.pm deleted file mode 100644 index 24d2227..0000000 --- a/beagle/debian-rfs/usr/share/perl/5.10.1/utf8.pm +++ /dev/null @@ -1,25 +0,0 @@ -package utf8; - -$utf8::hint_bits = 0x00800000; - -our $VERSION = '1.07'; - -sub import { - $^H |= $utf8::hint_bits; - $enc{caller()} = $_[1] if $_[1]; -} - -sub unimport { - $^H &= ~$utf8::hint_bits; -} - -sub AUTOLOAD { - require "utf8_heavy.pl"; - goto &$AUTOLOAD if defined &$AUTOLOAD; - require Carp; - Carp::croak("Undefined subroutine $AUTOLOAD called"); -} - -1; -__END__ - |
