One Hat Cyber Team
Your IP :
172.16.0.254
Server IP :
58.26.163.33
Server :
Windows NT DGPENSV2LPKMN 10.0 build 14393 (Windows Server 2016) AMD64
Server Software :
Apache/2.4.46 (Win64) OpenSSL/1.1.1h PHP/7.3.25
PHP Version :
7.3.25
Buat File
|
Buat Folder
Eksekusi
Dir :
C:
/
xampp7
/
perl
/
vendor
/
lib
/
Encode
/
compat
/
Edit File:
5006001.pm
# $File: //member/autrijus/Encode-compat/lib/Encode/compat/5006001.pm $ $Author: autrijus $ # $Revision: #3 $ $Change: 2534 $ $DateTime: 2002/12/02 00:33:16 $ package Encode::compat::5006001; our $VERSION = '0.05'; 1; package Encode; use strict; use base 'Exporter'; no warnings 'redefine'; sub _utf8_on { $_[0] = pack('U*', unpack('U0U*', $_[0])) } sub _utf8_off { $_[0] = pack('C*', unpack('C*', $_[0])) } sub is_utf8 { # XXX: got any better ideas? use utf8; foreach my $char (split(//, $_[0])) { return 1 if ord($char) > 255; } return 0; } 1;
Simpan