1#@!#!123s

D7net

: / lib / x86_64-linux-gnu / perl-base /

Filename : utf8.pm

back

package utf8;

use strict;
use warnings;

our $hint_bits = 0x00800000;

our $VERSION = '1.25';
our $AUTOLOAD;

sub import {
    $^H |= $hint_bits;
}

sub unimport {
    $^H &= ~$hint_bits;
}

sub AUTOLOAD {
    goto &$AUTOLOAD if defined &$AUTOLOAD;
    require Carp;
    Carp::croak("Undefined subroutine $AUTOLOAD called");
}

1;
__END__