X7ROOT File Manager
Current Path:
/usr/share/perl5/vendor_perl/Pod/Simple
usr
/
share
/
perl5
/
vendor_perl
/
Pod
/
Simple
/
??
..
??
BlackBox.pm
(70.9 KB)
??
Checker.pm
(5.21 KB)
??
Debug.pm
(4.52 KB)
??
DumpAsText.pm
(3.94 KB)
??
DumpAsXML.pm
(4.45 KB)
??
HTML.pm
(33.8 KB)
??
HTMLBatch.pm
(39.2 KB)
??
HTMLLegacy.pm
(2.69 KB)
??
LinkSection.pm
(4.24 KB)
??
Methody.pm
(3.49 KB)
??
Progress.pm
(2.36 KB)
??
PullParser.pm
(25.13 KB)
??
PullParserEndToken.pm
(2.82 KB)
??
PullParserStartToken.pm
(4.05 KB)
??
PullParserTextToken.pm
(3.28 KB)
??
PullParserToken.pm
(3.91 KB)
??
RTF.pm
(21.96 KB)
??
Search.pm
(34.29 KB)
??
SimpleTree.pm
(4.52 KB)
??
Subclassing.pod
(32.51 KB)
??
Text.pm
(4.98 KB)
??
TextContent.pm
(2.46 KB)
??
TiedOutFH.pm
(2.69 KB)
??
Transcode.pm
(736 B)
??
TranscodeDumb.pm
(2.63 KB)
??
TranscodeSmart.pm
(715 B)
??
XHTML.pm
(25.78 KB)
??
XMLOutStream.pm
(4.56 KB)
Editing: 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.35'; 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;
Upload File
Create Folder