view release on metacpan or search on metacpan
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/html; charset=UTF-8"
],
"<!DOCTYPE html>\r\n\r\n<html>\r\n\r\n<head>\r\n\r\n<title>CelesTrak</title>\r\n\r\n<link rel=\"stylesheet\" type=\"text/css\" href=\"/site.css\">\r\n\r\n</head>\r\n\r\n<body>\r\n\r\n<!-- Formerly Celestial BBS and Celestial WWW -->\r\n\r\n<...
]
},
"https://celestrak.org/NORAD/elements/stations.txt" : {
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"403",
"Forbidden",
[
"Content-Type",
"text/html; charset=iso-8859-1"
],
"<!DOCTYPE HTML PUBLIC \"-//IETF//DTD HTML 2.0//EN\">\n<html><head>\n<title>403 Forbidden</title>\n</head><body>\n<h1>Forbidden</h1>\n<p>You don't have permission to access /\non this server.<br />\n</p>\n<p>Additionally, a 403 Forbidden\ner...
]
},
"https://www.space-track.org/" : {
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/html; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org"
],
""
]
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain;charset=UTF-8",
"Status",
"200"
],
"1 25544U First line of data\r\n2 25544 Second line of data\r\n1 25544U First line of data\r\n2 25544 Second line of data\r\n1 25544U First line of data\r\n2 25544 Second line of data\r\n1 25544U First line of data\r\n2 25544 Second line of ...
]
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org",
"Status",
"200"
],
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org",
"Status",
"200"
],
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org",
"Status",
"200"
],
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain;charset=UTF-8",
"Status",
"200"
],
"1 20918U First line of data\r\n2 20918 Second line of data\r\n1 21149U First line of data\r\n2 21149 Second line of data\r\n1 21814U First line of data\r\n2 21814 Second line of data\r\n1 21940U First line of data\r\n2 21940 Second line of ...
]
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org",
"Status",
"200"
],
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain;charset=UTF-8",
"Status",
"200"
],
"1 25544U First line of data\r\n2 25544 Second line of data\r\n1 36086U First line of data\r\n2 36086 Second line of data\r\n1 41765U First line of data\r\n2 41765 Second line of data\r\n1 41834U First line of data\r\n2 41834 Second line of ...
]
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain;charset=UTF-8",
"Status",
"200"
],
"1 25544U First line of data\r\n2 25544 Second line of data\r\n1 25545U First line of data\r\n2 25545 Second line of data\r\n1 25546U First line of data\r\n2 25546 Second line of data\r\n"
]
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org",
"Status",
"200"
],
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org",
"Status",
"200"
],
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain;charset=UTF-8",
"Status",
"200"
],
"1 34627U First line of data\r\n2 34627 Second line of data\r\n1 35691U First line of data\r\n2 35691 Second line of data\r\n"
]
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain;charset=UTF-8",
"Status",
"200"
],
"1 38358U First line of data\r\n2 38358 Second line of data\r\n1 38359U First line of data\r\n2 38359 Second line of data\r\n"
]
t/data/Mock-LWP-UserAgent/resp.json view on Meta::CPAN
"GET" : [
"200",
"OK",
[
"Content-Type",
"text/plain; charset=UTF-8",
"Set-Cookie",
"chocolatechip=This bears no relation to any cookie set by Space Track; path=/; domain=www.space-track.org",
"Status",
"200"
],
view release on metacpan or search on metacpan
root/static/edit.html view on Meta::CPAN
<!DOCTYPE html>
<!-- HTML for static distribution bundle build -->
<html lang="en">
<head>
<meta charset="UTF-8">
<title>OpenAPI Editor - ASYNC-SERVICE-NAME</title>
<style>
* {
box-sizing: border-box;
}
view release on metacpan or search on metacpan
examples/pagi-chat/lib/ChatApp/HTTP.pm view on Meta::CPAN
# Debug: print the public dir on load
print STDERR "[HTTP] PUBLIC_DIR = $PUBLIC_DIR\n";
my %MIME_TYPES = (
html => 'text/html; charset=utf-8',
css => 'text/css; charset=utf-8',
js => 'application/javascript; charset=utf-8',
json => 'application/json; charset=utf-8',
png => 'image/png',
ico => 'image/x-icon',
);
sub handler {
examples/pagi-chat/lib/ChatApp/HTTP.pm view on Meta::CPAN
await $send->({
type => 'http.response.start',
status => $result->{status},
headers => [
['content-type', 'application/json; charset=utf-8'],
['content-length', length($body)],
],
});
await $send->({
view release on metacpan or search on metacpan
appname: "AtomBus"
charset: "UTF-8"
atombus:
page_size: 100
db:
dsn: "dbi:Pg:dbname=atombus"
view release on metacpan or search on metacpan
lib/Audio/Scrobbler.pm view on Meta::CPAN
$req = HTTP::Request->new('POST', $self->{'nexturl'});
if (!$req) {
$self->err('Could not create the submission request object');
return undef;
}
$req->content_type('application/x-www-form-urlencoded; charset="UTF-8"');
$s = 'u='.URLEncode($self->{'cfg'}{'username'}).
"&s=$md5resp&a[0]=".URLEncode($info->{'artist'}).
'&t[0]='.URLEncode($info->{'title'}).
'&b[0]='.URLEncode($info->{'album'}).
'&m[0]='.
view release on metacpan or search on metacpan
examples/js/jquery-1.9.1.js view on Meta::CPAN
type: "GET",
isLocal: rlocalProtocol.test( ajaxLocParts[ 1 ] ),
global: true,
processData: true,
async: true,
contentType: "application/x-www-form-urlencoded; charset=UTF-8",
/*
timeout: 0,
data: null,
dataType: null,
username: null,
examples/js/jquery-1.9.1.js view on Meta::CPAN
script = document.createElement("script");
script.async = true;
if ( s.scriptCharset ) {
script.charset = s.scriptCharset;
}
script.src = s.url;
// Attach handlers for all browsers
view release on metacpan or search on metacpan
# views/layouts/main.tt)
layout: "main"
session: "simple"
# when the charset is set to UTF-8 Dancer will handle for you
# all the magic of encoding and decoding. You should not care
# about unicode within your app when this setting is set (recommended).
charset: "UTF-8"
# template engine
# simple: default and very basic template engine
# template_toolkit: TT
view release on metacpan or search on metacpan
lib/Authen/CAS/UserAgent.pm view on Meta::CPAN
'targetService' => $service,
);
# fetch proxy ticket and parse response xml
my $response = $ua->simple_request(HTTP::Request::Common::GET($ptUri));
my $doc = eval {XML::LibXML->new()->parse_string($response->decoded_content('charset' => 'none'))};
if($@ || !$doc) {
$h->{'error'} = ERROR_PROXY_INVALIDRESPONSE;
push @{$h->{'errors'}}, $h->{'error'};
return;
}
view release on metacpan or search on metacpan
DigestMD5.pm view on Meta::CPAN
sub got_request {
my $this=shift;
my $req=shift;
# $this->{_r}=$req;
for my $k (qw(nonce realm charset)) {
$this->{$k}=$req->{$k} if exists $req->{$k};
}
#$this->{nc}=sprintf("%08d", ++$this->{_nc}{$req->{nonce}})
# if exists $req->{nonce};
if (exists $req->{qop}) {
view release on metacpan or search on metacpan
t/callback.t view on Meta::CPAN
ok(&{$sasl->{user}} eq 'somebody');
ok($sasl->{mechanism} eq 'DIGEST-MD5');
#my $con = $sasl->client_new('imap', 'localhost')
# or die $sasl->error;
#my $so = 'nonce="3QcmMSzgYToomMPhU7qOrM58XdeVZ9pAIZ+d9AWie1A=",realm="localhost",qop="auth,auth-int,auth-conf",cipher="rc4-40,rc4-56,rc4
#maxbuf=4096,charset=utf-8,algorithm=md5-sess';
#my $step = $con->client_step($so);
#ok($step);
view release on metacpan or search on metacpan
lib/Authen/SASL/Perl/DIGEST_MD5.pm view on Meta::CPAN
my $realm = $self->_call('realm');
$realm ||= $self->host;
my %response = (
nonce => $self->{nonce},
charset => 'utf-8',
algorithm => 'md5-sess',
realm => $realm,
maxbuf => $self->property('maxbuf'),
## IN DRAFT ONLY:
lib/Authen/SASL/Perl/DIGEST_MD5.pm view on Meta::CPAN
nonce => $sparams{'nonce'},
cnonce => $CNONCE ? md5_hex($CNONCE) : unpack('H32',urandom(16)),
'digest-uri' => $self->service . '/' . $self->host,
# calc how often the server nonce has been seen; server expects "00000001"
nc => sprintf("%08d", ++$self->{nonce_counts}{$sparams{'nonce'}}),
charset => $sparams{'charset'},
);
return $self->set_error("Server qop too weak (qop = $sparams{'qop'})")
unless ($self->_client_layer(\%sparams,\%response));
view release on metacpan or search on metacpan
share/stub.html.tt view on Meta::CPAN
<!doctype html>
<html>
<head>
<title></title>
<meta charset="utf-8">
<link rel="stylesheet" href="[% project %].css">
</head>
<body>
<script src="[% project %]"></script>
</body>
view release on metacpan or search on metacpan
scripts/upgrade04to05.pl view on Meta::CPAN
my $all = $dbh->selectall_hashref('SELECT storyname,minicontent,content FROM stories;', 'storyname');
foreach my $story (values(%{$all})) {
my $formatter1 = Formatter::HTML::Textile->format(encode_entities(decode_utf8(${$story}{content})));
$formatter1->charset('utf-8');
$formatter1->char_encoding(0);
my $content = $formatter1->fragment;
my $formatter2 = Formatter::HTML::Textile->format(encode_entities(decode_utf8(${$story}{minicontent})));
$formatter2->charset('utf-8');
$formatter2->char_encoding(0);
my $minicontent = $formatter2->fragment;
$dbh->do("UPDATE stories SET minicontent=?,content=? WHERE storyname=?", {}, ($minicontent,$content,${$story}{storyname}));
}
my $allc = $dbh->selectall_arrayref('SELECT content FROM comments;');
foreach my $comment (@{$allc}) {
my $formatter1 = Formatter::HTML::Textile->format(encode_entities(decode_utf8(${$comment}[0])));
$formatter1->charset('utf-8');
$formatter1->char_encoding(0);
my $content = $formatter1->fragment;
$dbh->do("UPDATE comments SET content=? WHERE content=?", {}, ($content,${$comment}[0]));
}
view release on metacpan or search on metacpan
CharsetConv.pm view on Meta::CPAN
sub parse_start {
my $e = shift;
my $tag = shift;
my %attr = @_;
if ($tag eq 'charset-convert') {
$attr{from} ||= 'iso-8859-1';
$attr{to} ||= 'utf-8';
$e->append_to_script("{ #start charset-convert\n");
$e->append_to_script(" my \$charconv = Apache::AxKit::CharsetConv->new('$attr{from}','$attr{to}');\n");
$e->append_to_script(" my \$to_convert = ''");
}
else {
die "Unknown tag $tag in CharsetConv taglib";
CharsetConv.pm view on Meta::CPAN
sub parse_end {
my $e = shift;
my $tag = shift;
if ($tag eq 'charset-convert') {
$e->append_to_script(";\n");
$e->start_expr;
$e->append_to_script(" \$charconv->convert(\$to_convert);");
$e->end_expr;
$e->append_to_script("} # end of charset-convs\n");
}
return '';
}
CharsetConv.pm view on Meta::CPAN
=pod
=head1 NAME
AxKit::XSP::CharsetConv - AxKit XSP taglib for charset conversion
=head1 SYNOPSIS
Add the CharsetConv namespace to your XSP C<<xsp:page>> tag:
CharsetConv.pm view on Meta::CPAN
the environment, etc...) that are not UTF-8 yet need to be included in
the output of your XSP.
=head2 Tag Reference
There is only one tag provided by this taglib: charset-convert. It
has two mandatory attributes, from and to, which are the character
codes to convert (surprise) from and to.
The to attribute defaults to UTF-8, which usually makes sense. The from
attribute on the other hand defaults to ISO-8859-1. While this default
view release on metacpan or search on metacpan
Sendmail.pm view on Meta::CPAN
$address_errors .= "Address '$mailer_args->{From}' in 'From' element failed $Email::Valid::Details check. ";
}
# set the content-type
$mailer_args->{'Content-Type'} = ($mailer_args->{'Content-Type'})? $mailer_args->{'Content-Type'} : 'text/plain';
$mailer_args->{'Content-Type'} .= '; charset=';
$mailer_args->{'Content-Type'} .= ($mailer_args->{'charset'})? $mailer_args->{'charset'} : 'utf-8';
# munge the text if it needs to be
if ($mailer_args->{'charset'} and lc($mailer_args->{'charset'}) ne 'utf-8') {
my $conv = Apache::AxKit::CharsetConv->new('utf-8',$mailer_args->{'charset'})
or croak "No such charset: $mailer_args->{'charset'}";
$mailer_args->{'message'} = $conv->convert($mailer_args->{'message'});
}
if ($address_errors) {
Sendmail.pm view on Meta::CPAN
return q| $mail_args{'Content-Type'} = ''|;
}
elsif ($tag eq 'content-transfer-encoding') {
return q| $mail_args{'Content-Transfer-Encoding'} = ''|;
}
elsif ($tag eq 'charset') {
return q| $mail_args{'charset'} = ''|;
}
elsif ($tag =~ /^(subject|message|from|body)$/) {
$tag = "From" if $tag eq 'from';
$tag = "message" if $tag eq 'body';
return qq| \$mail_args{'$tag'} = "" |;
Sendmail.pm view on Meta::CPAN
Defines the content-transfer-encoding of the body of the message. The
default depends on whether you have MIME::QuotedPrint available or not.
If you do, it defaults to 'quoted-printable', and if you don't to '8bit';
=head2 C<E<lt>sendmail:charsetE<gt>>
Defines the charset of the body of the message (default: utf-8). Your
system's iconv implementation needs to support converting from utf-8
to that character set otherwise sending email will fail.
=head2 C<E<lt>sendmail:headerE<gt>>
view release on metacpan or search on metacpan
lib/AxKit2/Transformer/TAL.pm view on Meta::CPAN
$ct = "application/xml";
}
my $enc = "UTF-8";
$client->headers_out->header('Content-Length', bytelength($out));
$client->headers_out->header('Content-Type', "$ct; charset=$enc");
$client->send_http_headers;
$client->write($out);
}
1;
view release on metacpan or search on metacpan
ramblings/Export-DynaLoader-symbols-from-libperl-again.patch view on Meta::CPAN
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="------------1.7.6.1"
This is a multi-part message in MIME format.
--------------1.7.6.1
Content-Type: text/plain; charset=UTF-8; format=fixed
Content-Transfer-Encoding: 8bit
With 5.15.2 and the new xubpp, DynaLoader symbols were XS_INTERNAL, before
they were effectively XS_EXTERNAL. This broke B::C and possibly other
view release on metacpan or search on metacpan
t/testdata/P522.pm view on Meta::CPAN
use feature 'unicode_strings';
print /a/d, s/b/c/d;
}
{
BEGIN { $^H{'reflags'} = '0';
$^H{'reflags_charset'} = '2'; }
print /a/d, s/b/c/d;
}
{
no feature ':all';
use feature ':5.12';
view release on metacpan or search on metacpan
GETPWUID_R_PROTO|5.008000|5.008000|Vn
get_quantifier_value|5.033006||Viu
get_re_arg|||xciu
get_re_gclass_nonbitmap_data|5.031011||Viu
get_regclass_nonbitmap_data|5.031011||Viu
get_regex_charset_name|5.031004||Vniu
getservbyname|5.005000||Viu
GETSERVBYNAME_R_HAS_BUFFER|5.008000||Viu
GETSERVBYNAME_R_HAS_PTR|5.008000||Viu
GETSERVBYNAME_R_PROTO|5.008000|5.008000|Vn
getservbyport|5.005000||Viu
view release on metacpan or search on metacpan
lib/B/ppport.h view on Meta::CPAN
get_op_descs|5.005000|5.005000|u
get_op_names|5.005000|5.005000|u
get_ppaddr|5.006000|5.006000|u
get_re_arg|||xciu
_get_regclass_nonbitmap_data|5.019009||cViu
get_regex_charset_name|5.031004||nViu
get_sv|5.006000|5.003007|p
GetVars|5.006000||Vu
get_vtbl|5.005003|5.005003|u
G_EVAL|5.003007|5.003007|
GIMME|5.003007|5.003007|
view release on metacpan or search on metacpan
},
'utf-8|utf8|8' => sub {
$enc = 'UTF-8';
},
'character-set|charset|encoding|e=s' => sub {
$enc = $_[1];
},
'file|f=s' => sub { doFile $_[1] },
'<>' => sub { doString $_[0] },
view release on metacpan or search on metacpan
lib/BBS/DiscuzX2.pm view on Meta::CPAN
my $bbs = BBS::DiscuzX2->new();
#åˆå§‹åŒ–åŽå°æ•°æ®åº“连接
#dp_port / db_charset 也å¯ä¸å¡«
$bbs->init_db_handler(
db_host => 'xxx.xxx.xxx.xxx',
lib/BBS/DiscuzX2.pm view on Meta::CPAN
db_passwd => 'xxx',
db_name => 'xxx',
db_charset => 'utf8',
);
=over
=back
lib/BBS/DiscuzX2.pm view on Meta::CPAN
my $dsn = "DBI:mysql:host=$db_opt{db_host};port=$db_opt{db_port};database=$db_opt{db_name}";
$self->{db_handler} = BBS::DiscuzX2::DB->new(
connect_info => [ $dsn, $db_opt{db_user}, $db_opt{db_passwd} ]
);
if($db_opt{db_charset}){
$self->{db_handler}->do("SET character_set_client='$db_opt{db_charset}'");
$self->{db_handler}->do("SET character_set_connection='$db_opt{db_charset}'");
$self->{db_handler}->do("SET character_set_results='$db_opt{db_charset}'");
}
for my $k (qw/default_passwd default_group_id/){
next unless(exists $db_opt{$k});
$self->{db_handler}{$k} = $db_opt{$k};
view release on metacpan or search on metacpan
config.h.in view on Meta::CPAN
#undef HAVE_LCHOWN
/* Define to 1 if you have the `acl' library (-lacl). */
#undef HAVE_LIBACL
/* Define to 1 if you have the <libcharset.h> header file. */
#undef HAVE_LIBCHARSET_H
/* Define to 1 if you have the `inet' library (-linet). */
#undef HAVE_LIBINET
config.h.in view on Meta::CPAN
#undef HAVE_LINK
/* True if you have Linux xattrs */
#undef HAVE_LINUX_XATTRS
/* Define to 1 if you have the `locale_charset' function. */
#undef HAVE_LOCALE_CHARSET
/* Define to 1 if you have the <locale.h> header file. */
#undef HAVE_LOCALE_H
config.h.in view on Meta::CPAN
#undef TIME_WITH_SYS_TIME
/* Define to 1 if you want rsync to make use of iconv_open() */
#undef USE_ICONV_OPEN
/* String to pass to iconv() for the UTF-8 charset. */
#undef UTF8_CHARSET
/* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most
significant byte first (like Motorola and SPARC, unlike Intel). */
#if defined AC_APPLE_UNIVERSAL_BUILD
view release on metacpan or search on metacpan
lib/Badger/Codec/HTML.pm view on Meta::CPAN
'ISO-8859-1' => \&fix_windows,
'WINDOWS-1252' => \&fix_windows,
};
sub encode {
my ($class, $html, $charset) = @_;
my $filter;
return undef unless defined($html);
for ($html) {
lib/Badger/Codec/HTML.pm view on Meta::CPAN
s/</</g;
}
# pass resulting HTML through any corresponding filter for the
# character set (if specified)
if ($charset && ($filter = $CHARSET->{ $charset })) {
$html = &$filter($html);
}
return $html;
}
lib/Badger/Codec/HTML.pm view on Meta::CPAN
The L<decode()> method reverses this process.
=head1 METHODS
=head2 encode($html, $charset)
Encodes the HTML text passed as the first argument.
$encoded = Badger::Codec::HTML->encode($html);
view release on metacpan or search on metacpan
t/soap-connect-lwp.t view on Meta::CPAN
is ( exception {
$response = $userAgent
->request(HTTP::Request::Common::POST( $connection->url,
Authorization => $connection->_authoriz,
Content_Type => 'text/xml;charset=UTF-8',
Content => $message))
} => undef, "uploadMultimediaContent request post - lives");
ok($response->is_success, 'response is succcess');
view release on metacpan or search on metacpan
lib/Beagle/Cmd/Command/spread.pm view on Meta::CPAN
if ( $entry->format ne 'plain' ) {
$mime->make_multipart;
$mime->attach(
Data => $entry->body_html,
'Content-Type' => 'text/html; charset=utf-8',
);
}
my $atts = $bh->attachments_map->{$id};
if ($atts) {
view release on metacpan or search on metacpan
Media/beamer-reveal-PCB.html view on Meta::CPAN
<html lang="">
<head>
<title>PCB</title>
<meta http-equiv="content-type" content="text/html; charset=utf-8"/>
<meta name="viewport" content="user-scalable=no"/>
<style>
body {margin: 0;}
</style>
view release on metacpan or search on metacpan
examples/chat/chat.html view on Meta::CPAN
<!DOCTYPE HTML>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
<script language="Javascript" type="text/javascript" defer src="https://cdnjs.cloudflare.com/ajax/libs/mqtt/4.3.7/mqtt.min.js"></script>
<script language="Javascript" type="text/javascript" defer src="https://cdnjs.cloudflare.com/ajax/libs/pako/2.1.0/pako_inflate.min.js"></script>
<script language="Javascript" type="text/javascript" defer src="js/config.js"></script>
<script language="Javascript" type="text/javascript" defer src="js/beekeeper.js"></script>
<script language="Javascript" type="text/javascript" defer src="js/chat.js"></script>
view release on metacpan or search on metacpan
data/wiki0.html view on Meta::CPAN
<!DOCTYPE html>
<html class="client-nojs" lang="en" dir="ltr">
<head>
<meta charset="UTF-8"/>
<title>Wikipedia, the free encyclopedia</title>
<script>document.documentElement.className="client-js";RLCONF={"wgBreakFrames":false,"wgSeparatorTransformTable":["",""],"wgDigitTransformTable":["",""],"wgDefaultDateFormat":"dmy","wgMonthNames":["","January","February","March","April","May","June",...
"tags":{"status":{"levels":-1}}},"wgMediaViewerOnClick":true,"wgMediaViewerEnabledByDefault":true,"wgPopupsFlags":10,"wgVisualEditor":{"pageLanguageCode":"en","pageLanguageDir":"ltr","pageVariantFallbacks":"en"},"wgMFDisplayWikibaseDescriptions":{"se...
"ext.visualEditor.desktopArticleTarget.noscript":"ready","ext.wikimediaBadges":"ready","ext.uls.interlanguage":"ready"};RLPAGEMODULES=["mediawiki.page.gallery","site","mediawiki.page.ready","skins.vector.legacy.js","ext.gadget.ReferenceTooltips","ext...
<script>(RLQ=window.RLQ||[]).push(function(){mw.loader.implement("user.options@1hzgi",function($,jQuery,require,module){/*@nomin*/mw.user.tokens.set({"patrolToken":"+\\","watchToken":"+\\","csrfToken":"+\\"});