Windows NT KAMIDAKI 10.0 build 19045 (Windows 10) AMD64
Apache/2.4.58 (Win64) OpenSSL/3.1.3 PHP/8.3.9
Server IP : 192.168.3.16 & Your IP : 216.73.216.52
Domains :
Cant Read [ /etc/named.conf ]
User : SISTEMA
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
C: /
xampp /
perl /
lib /
Devel /
Symdump /
Delete
Unzip
Name
Size
Permission
Date
Action
Export.pm
739
B
-rw-rw-rw-
2013-03-24 06:08
Save
Rename
package Devel::Symdump::Export; require Devel::Symdump; require Exporter; use Carp; use strict; use vars qw(@ISA @EXPORT_OK $AUTOLOAD); @ISA=('Exporter'); @EXPORT_OK=( 'packages' , 'scalars' , 'arrays' , 'hashes' , 'functions' , 'filehandles' , 'dirhandles' , 'ios' , 'unknowns' , ); my %OK; @OK{@EXPORT_OK}=(1) x @EXPORT_OK; push @EXPORT_OK, "symdump"; # undocumented feature symdump() -- does it save enough typing? sub symdump { my @packages = @_; Devel::Symdump->new(@packages)->as_string; } AUTOLOAD { my @packages = @_; (my $auto = $AUTOLOAD) =~ s/.*:://; confess("Unknown function call $auto") unless $OK{$auto}; my @ret = Devel::Symdump->new->$auto(@packages); return @ret; } 1;