view release on metacpan or search on metacpan
#
# 4. CGI HEAD
#
my $postpg = <<'EOPAGE';
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
view all matches for this distribution
view release on metacpan or search on metacpan
0.0.5 Thu Oct 09 2008
Fix some errors in test script
0.0.4 Mon Sep 22 2008
Add Geo::Point support
Remove H::MA::P::XHTML dependency
Update data of newest models
0.0.3 Tue Jan 29 18:50:00 2008
- Maintain some funny codes, thanks to Black TKSK
- Escaping unsafe character in description
view all matches for this distribution
view release on metacpan or search on metacpan
lib/HTTP/MobileAgent/DoCoMo.pm view on Meta::CPAN
# only available in eggy/M-stage
# e.g.) "DoCoMo/1.0/eggy/c300/s32/kPHS-K"
printf "Bandwidth: %dkbps\n", $agent->bandwidth; # 32
# e.g.) "DoCoMo/2.0 SO902i(c100;TB;W30H16)"
print "XHTML compiant!\n" if $agent->xhtml_compliant; # true
# e.g.) "DoCoMo/2.0 P07A(c500;TB;W24H15)"
printf "Browser ver: %s\n", $agent->browser_version # 2.0
=head1 DESCRIPTION
lib/HTTP/MobileAgent/DoCoMo.pm view on Meta::CPAN
=item xhtml_compliant
if ($agent->xhtml_compliant) { }
returns if the agent is XHTML compliant.
=item browser_version
if ($agent->browser_version > 2.0) { }
view all matches for this distribution
view release on metacpan or search on metacpan
lib/HTTP/MobileAttribute/Plugin/XHTMLCompliant.pm view on Meta::CPAN
=for stopwords XHTML
=head1 NAME
HTTP::MobileAttribute::Plugin::XHTMLCompliant - XHTML 対å¿ãã¦ããã®?
=head1 SYNOPSIS
use HTTP::MobileAttribute plugins => [qw/XHTMLCompliant IS::ThirdForce/];
view all matches for this distribution
view release on metacpan or search on metacpan
docs/HTTP_ProxyCheck.html view on Meta::CPAN
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>HTTP::ProxyCheck - a class to check the functionality of HTTP proxy servers.</title>
<link rel="stylesheet" href="style.css" type="text/css" />
<link rev="made" href="mailto:root@localhost" />
view all matches for this distribution
view release on metacpan or search on metacpan
t/t-euc-jp.html view on Meta::CPAN
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=EUC-JP"/>
<title>Test</title>
view all matches for this distribution
view release on metacpan or search on metacpan
examples/session.pl view on Meta::CPAN
my $req = shift;
my $session = get_session($req);
my $count = $session->get('count') || 0;
my $html = tt strip q{
<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head></head>
<body>
count is <a href="/">[% count |html %]</a><br />
state is [% session.state | html %]<br />
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Catalyst/Helper/Controller/Handel/Cart.pm view on Meta::CPAN
- REGEX
- !!perl/regexp (?i-xsm:^[a-f0-9]{8}-([a-f0-9]{4}-){3}[a-f0-9]{12}$)
- mode
- [ [BETWEEN, 1, 3] ]
__products__
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Nifty New Products</title>
<base href="http://localhost:3000/" />
view all matches for this distribution
view release on metacpan or search on metacpan
t/jekyll_test_source/_layouts/default.html view on Meta::CPAN
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en-us">
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Hopkins/Plugin/HMI.pm view on Meta::CPAN
=cut
1;
__DATA__
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head>
<title>hopkins HMI - error</title>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Hyper/Developer/var/Hyper/Developer/Server.htc view on Meta::CPAN
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/2002/REC-xhtml1-20020801/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en" xmlns:svg="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" content="text/xhtml; charset=utf-8">
<head>
<title>Hyper Developer Server - Overview</title>
<style type="text/css">
body,td,th,a,p,.h { font-family: arial,sans-serif; }
view all matches for this distribution
view release on metacpan or search on metacpan
pod/perl_pod.css view on Meta::CPAN
/*---
Copyright (c) 2004 JJ
Perl 5.8.x Documentation XHTML CSS Selectors
$Revision: 1.1 $
TOC
view all matches for this distribution
view release on metacpan or search on metacpan
t/test.html view on Meta::CPAN
<!DOCTYPE HTML PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html class=" scriptsOn" xmlns:fb="http://www.facebook.com/2008/fbml" xmlns:og="http://opengraphprotocol.org/schema/" xmlns="http://www.w3.org/1999/xhtml"><head>
view all matches for this distribution
view release on metacpan or search on metacpan
brotli/c/common/dictionary.bin view on Meta::CPAN
selected="high schoolresponse tocomfortableadoption ofthree yearsthe countryin Februaryso that thepeople who provided by<param nameaffected byin terms ofappointmentISO-8859-1"was born inhistorical regarded asmeasurementis based on and other : functi...
having been
<head>
< "The compilationhe had beenproduced byphilosopherconstructedintended toamong othercompared toto say thatEngineeringa differentreferred todifferencesbelief thatphotographsidentifyingHistory of Republic ofnecessarilyprobabilitytechnicallyleaving...
<div id="incorporate;</script><attachEventbecame the " target="_carried outSome of thescience andthe time ofContainer">maintainingChristopherMuch of thewritings of" height="2size of theversion of mixture of between theExamples ofeducationalcompetitiv...
Continentaleliminatingwill not bepractice ofin front ofsite of theensure thatto create amississippipotentiallyoutstandingbetter thanwhat is nowsituated inmeta name="TraditionalsuggestionsTranslationthe form ofatmosphericideologicalenterprisescalculat...
question ofwas electedto become abecause of some peopleinspired bysuccessful a time whenmore commonamongst thean officialwidth:100%;technology,was adoptedto keep thesettlementslive birthsindex.html"Connecticutassigned to&times;account foralign=ri...
</head>
Conversely,>
<div id="0" width="1is probablyhave becomecontrollingthe problemcitizens ofpoliticiansreached theas early as:none; over<table cellvalidity ofdirectly toonmousedownwhere it iswhen it wasmembers of relation toaccommodatealong with In the latethe Englis...
brotli/c/common/dictionary.bin view on Meta::CPAN
establishment of the </div></div></div></d#viewport{min-height:
<script src="http://option><option value=often referred to as /option>
<option valu<!DOCTYPE html>
<!--[International Airport>
<a href="http://www</a><a href="http://wภาษาà¹à¸à¸¢á¥áá áá£ááæ£é«ä¸æ (ç¹é«)निरà¥à¤¦à¥à¤¶à¤¡à¤¾à¤à¤¨à¤²à¥à¤¡à¤à¥à¤·à¥à¤¤à¥à¤°à¤à¤¾à¤¨à¤à¤¾à¤°à¥à¤¸à¤à¤¬à¤à¤§à¤¿à¤¤à¤¸à¥à¤¥à¤¾à¤ªà¤¨à¤¾à¤¸à¥à¤µà¥à¤à¤¾à¤°...
<html <meta charset="utf-8">:url" content="http://.css" rel="stylesheet"style type="text/css">type="text/css" href="w3.org/1999/xhtml" xmltype="text/javascript" method="get" action="link rel="stylesheet" = document.getElementtype="image/x-icon" />ce...
<input type="hidden" language="JavaScript" document.getElementsBg="0" cellspacing="0" ype="text/css" media="type='text/javascript'with the exception of ype="text/css" rel="st height="1" width="1" ='+encodeURIComponent(<link rel="alternate"
body, tr, input, textmeta name="robots" conmethod="post" action=">
<a href="http://www.css" rel="stylesheet" </div></div><div classlanguage="javascript">aria-hidden="true">·<ript" type="text/javasl=0;})();
(function(){background-image: url(/a></li><li><a href="h <li><a href="http://ator" aria-hidden="tru> <a href="http://www.language="javascript" /option>
<option value/div></div><div class=rator" aria-hidden="tre=(new Date).getTime()português (do Brasil)оÑганизаÑиивозможноÑÑÑобÑазованиÑÑегиÑÑÑаÑиивозможноÑÑиобÑзаÑелÑна<!DOCTYPE html PU...
link rel="shortcut icon<link rel="stylesheet" </script>
<script type== document.createElemen<a target="_blank" href= document.getElementsBinput type="text" name=a.type = 'text/javascrinput type="hidden" namehtml; charset=utf-8" />dtd">
<html xmlns="http-//W3C//DTD HTML 4.01 TentsByTagName('script')input type="hidden" nam<script type="text/javas" style="display:none;">document.getElementById(=document.createElement(' type='text/javascript'input type="text" name="d.getElementsByTagNa...
<style type="text/css">ional.dtd">
view all matches for this distribution
view release on metacpan or search on metacpan
lib/IO/HyCon.html view on Meta::CPAN
<?xml version="1.0" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title></title>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<link rev="made" href="mailto:support@citrusperl.org" />
view all matches for this distribution
view release on metacpan or search on metacpan
html/lib/IO/Moose.html view on Meta::CPAN
<?xml version="1.0" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>IO::Moose - Reimplementation of IO::* with improvements</title>
<link rel="stylesheet" href="../../../Active.css" type="text/css" />
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
view all matches for this distribution
view release on metacpan or search on metacpan
examples/example.html view on Meta::CPAN
</TR>
<TR>
<TD><PRE>
URL from to examples/sources/fragment.html
<span class="syntax"><span class="synLineNumber"> 1</span> <?xml version="1.0" encoding="UTF-8"?>
<span class="synLineNumber"> 2</span> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
<span class="synLineNumber"> 3</span> "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<span class="synLineNumber"> 4</span> <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="es" lang="es">
<span class="synLineNumber"> 5</span>
<span class="synLineNumber"> 6</span> <head>
<span class="synLineNumber"> 7</span> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
examples/example.html view on Meta::CPAN
</TR>
<TR>
<TD><PRE>
URL from to examples/sources/fragment.html
<span class="syntax"><span class="synLineNumber"> 1</span> <span class="synIdentifier"><?xml </span><span class="synType">version</span><span class="synIdentifier">=</span><span class="synConstant">"1.0"</span><span class="synIdentif...
<span class="synLineNumber"> 2</span> <span class="synComment"><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"</span>
<span class="synLineNumber"> 3</span> <span class="synComment"> "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"></span>
<span class="synLineNumber"> 4</span> <span class="synIdentifier"><</span><span class="synStatement">html</span><span class="synIdentifier"> xmlns=</span><span class="synConstant">"http://www.w3.org/1999/xhtml"</span><span class="syn...
<span class="synLineNumber"> 5</span>
<span class="synLineNumber"> 6</span> <span class="synIdentifier"><</span><span class="synStatement">head</span><span class="synIdentifier">></span>
<span class="synLineNumber"> 7</span> <span class="synPreProc"> </span><span class="synIdentifier"><</span><span class="synStatement">meta</span><span class="synIdentifier"> </span><span class="synType">http-equiv</span><span class="synIdentif...
view all matches for this distribution
view release on metacpan or search on metacpan
ds9-interface.html view on Meta::CPAN
<?xml version="1.0" encoding="UTF-8" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
view all matches for this distribution
view release on metacpan or search on metacpan
epeg/doc/head.html view on Meta::CPAN
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>$title</title>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Image/ExifTool/HTML.pm view on Meta::CPAN
# HTML info
# (tag ID's are case insensitive and must be all lower case in tables)
%Image::ExifTool::HTML::Main = (
GROUPS => { 2 => 'Document' },
NOTES => q{
Meta information extracted from the header of HTML and XHTML files. This is
a mix of information found in the C<META> elements, C<XML> element, and the
C<TITLE> element.
},
dc => {
Name => 'DC',
lib/Image/ExifTool/HTML.pm view on Meta::CPAN
{
my ($et, $dirInfo) = @_;
my $raf = $$dirInfo{RAF};
my $buff;
# validate HTML or XHTML file
$raf->Read($buff, 256) or return 0;
$buff =~ /^(\xef\xbb\xbf)?\s*<(!DOCTYPE\s+HTML|HTML|\?xml)/i or return 0;
$buff =~ /<(!DOCTYPE\s+)?HTML/i or return 0 if $2 eq '?xml';
$et->SetFileType();
lib/Image/ExifTool/HTML.pm view on Meta::CPAN
for (;;) {
last unless $doc =~ m{<([\w:.-]+)(.*?)>}sg;
my ($tagName, $attrs) = ($1, $2);
my $tag = lc($tagName);
my ($val, $grp);
if ($attrs =~ m{/$}) { # self-contained XHTML tags end in '/>'
$val = '';
} else {
# look for element close
my $pos = pos($doc);
my $close = "</$tagName>";
view all matches for this distribution
view release on metacpan or search on metacpan
example/index.tmpl.html view on Meta::CPAN
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ja-JP">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Content-Style-Type" content="text/css" />
<meta http-equiv="Content-Script-Type" content="text/javascript" />
view all matches for this distribution
view release on metacpan or search on metacpan
* convert tests to Test::More
* add pod.t and pod_cover.t
* fix all POD errors
* use strict in Makefile.PL and generate custom META.yml
* don't include lib/Image/Info.pm - it is autogenerated anyway
* html_dim() returns lowercase and properly quoted, for SVG/XHTML etc.,
e.g. you get now 'width="900" height="800"'
* fix bug #8136: update URL for EXIF standard
* fix bug #8522 - dies at JPEGInterchangeFormatLngth (Thanx srezic@cpan.org)
* fix also: EXIF says it is "JPEGInterchangeFormatLength", and not "...Lngth"
* fix bug #5165: (duplicate of #8522)
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Pod/Markdown.pm view on Meta::CPAN
$URL_PREFIXES{perldoc} = $URL_PREFIXES{metacpan};
#{
our $HAS_HTML_ENTITIES;
# Stolen from Pod::Simple::XHTML 3.28. {{{
BEGIN {
$HAS_HTML_ENTITIES = eval "require HTML::Entities; 1";
}
inc/Pod/Markdown.pm view on Meta::CPAN
return $section;
}
{
# From Pod::Simple::XHTML 3.28.
# The strings gets passed through encode_entities() before idify().
# If we don't do it here the substitutions below won't operate consistently.
sub format_fragment_pod_simple_xhtml {
my ($self, $t) = @_;
view all matches for this distribution
view release on metacpan or search on metacpan
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>Image::Magick::Brand - Perl extension for creating branded images with ImageMagick.</title>
<link rev="made" href="mailto:root@hampsten.nonet" />
</head>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Image/Shoehorn/Gallery.pm view on Meta::CPAN
</xsl:stylesheet>
=item *
Generates valid XHTML (strict) and CSS!
=back
=cut
lib/Image/Shoehorn/Gallery.pm view on Meta::CPAN
#
# This is broken, I know.
# There appears to be some degree of funkiness going
# on with the inheritance chain for 2XHTML that is
# preventing the SAX::Machine from getting the output
# of 2XHTML and passing it on to $writer. I think, anyway.
my $xhtml = XML::Filter::XML_Directory_2XHTML->new(Handler=>$machine);
$xhtml->debug(0);
lib/Image/Shoehorn/Gallery.pm view on Meta::CPAN
use Image::Info;
my $possible_views;
use constant DTD_HTML_ROOT => "html";
use constant DTD_HTML_PUBLICID => "-//W3C//DTD XHTML 1.0 Strict//EN";
use constant DTD_HTML_SYSTEMID => "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd";
sub xml_decl {
my $self = shift;
$self->SUPER::xml_decl({
lib/Image/Shoehorn/Gallery.pm view on Meta::CPAN
return 1;
# NOTE : we are not setting the public and system doctypes here
# because they cause even more weirdness with XML::LibXML and it's
# seeming inability to deal with XHTML files. I really don't get
# what's going on so we play a little game and set them event the
# xml_decl event in the LocalSAX_Image filter is called next. Gah!
# NOTE ALSO : that this is also where we happen to set the encoding
view all matches for this distribution
view release on metacpan or search on metacpan
ex/make_gallery.pl view on Meta::CPAN
# Output the boilerplate part of the XHTML
$dir = basename $dir;
print <<"EO_Header";
<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html lang="en" xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>Image Gallery - $dir</title>
<meta name="created" content="$now" />
view all matches for this distribution
view release on metacpan or search on metacpan
Tileset.html view on Meta::CPAN
<?xml version="1.0" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>Image::Tileset - A tileset loader.</title>
<link rel="stylesheet" href="pod.css" type="text/css" />
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Imager/Bing/MapLayer.pm view on Meta::CPAN
=head2 Bing Maps
You can view tiles using the following web page, replacing the
C<credentials> option with your Bing Maps Key:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xmlns:v="urn:schemas-microsoft-com:vml"
xml:lang="en" lang="en">
<head>
<title>Tiles Test</title>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JQuery/Demo.pm view on Meta::CPAN
my $STYLE = $my->{info}{JQUERY_STYLE} || '' ;
my $BODY = $my->{info}{BODY} || '' ;
my $html = <<EOT;
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>$TITLE</title>
$JAVASCRIPT
view all matches for this distribution
view release on metacpan or search on metacpan
t/fixtures/jquery.js view on Meta::CPAN
rchecked = /checked\s*(?:[^=]|=\s*.checked.)/i,
rscriptType = /^$|\/(?:java|ecma)script/i,
rscriptTypeMasked = /^true\/(.*)/,
rcleanScript = /^\s*<!(?:\[CDATA\[|--)|(?:\]\]|--)>\s*$/g,
// We have to close these tags to support XHTML (#13200)
wrapMap = {
option: [ 1, "<select multiple='multiple'>", "</select>" ],
legend: [ 1, "<fieldset>", "</fieldset>" ],
area: [ 1, "<map>", "</map>" ],
param: [ 1, "<object>", "</object>" ],
view all matches for this distribution