XHTML results from the CPAN

HTML-XHTML-Lite

	$page.="Date: $now\n";
	$page.="Content-type: $p{content_type}; charset=$charset\n\n";
}

$page.="<?xml version=\"1.0\" encoding=\"" . lc($charset) . "\"?>\n" unless $p{noxml} || $p{nohead};
$page.="<!DOCTYPE html\n\tPUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n\t\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n" unless $p{nodoctype} || $p{nohead};

$page.=<<EOT;
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="$p{lang}" lang="$p{lang}">
<head>
<title>$p{title}</title>

lib/HTML/XHTML/Lite.pm view on Meta::CPAN

__END__
# Below is stub documentation for your module. You'd better edit it!

=head1 NAME

HTML::XHTML::Lite - Light-weight Perl module for XHTML CGI applications

=head1 SYNOPSIS

  use HTML::XHTML::Lite;

lib/HTML/XHTML/Lite.pm view on Meta::CPAN

  my %vars=getvars();

=head1 DESCRIPTION

This module provides a light-weight alternative to the Perl built-in, CGI.pm, for
those who wish for an easy way to produce a well-formed XHTML <head></head>,
with Dublin Core metadata. A function to create a footer is provided for 
completeness and it is even possible to provide body text to return a complete 
document.  Provision is made for the inclusion of links to RSS (or other) feeds 
and FOAF data.  The 'extras' property allows for the insertion of arbitrary elements 
into the document header.

lib/HTML/XHTML/Lite.pm view on Meta::CPAN

	foaftitle=>'FOAF data',
	});

=head4 Methods

   string	Return the XHTML created as a scalar variable; the
   default behaviour is to print the XHTML to STDOUT or the
   currently selected handle.

   	my $foo=start_page({string=>1, ....., });

   isfile	Target is a file, so we don't want to create any

lib/HTML/XHTML/Lite.pm view on Meta::CPAN


=head1 APPLICATION EXAMPLE

#!/usr/bin/perl

# Programme to create XHTML template
# through command line interaction.

use strict;
use warnings;
use HTML::XHTML::Lite;

lib/HTML/XHTML/Lite.pm view on Meta::CPAN

A web page for this module may be found here:
http://www.mss.cx/xhtmllite/

The alternative:	man CGI.pm
Dublin Core Metadata:	http://www.dublincore.org
XHTML Specification:	http://www.w3.org/TR/xhtml1/

=head1 AUTHOR

Matthew Smith, smiffy@cpan.org

view all matches for this distribution

HTML-Zoom

1 match

view release on metacpan or search on metacpan

t/parse_cdata.t view on Meta::CPAN

use Test::More skip_all => "Totally doesn't work yet";

# Test that contant of elements defined as containing intrinsic CDATA are not
# selected as elements

# NB: This tests HTML parsing rules. XHTML is different.

my $template = <<HTML;
<!DOCTYPE html>
<html lang=en-gb>
    <meta charset=utf-8>

view all matches for this distribution

HTML5-DOM

4 results

view release on metacpan or search on metacpan

README.pod view on Meta::CPAN

 my $node = $node->publicId($new_public_id);

Return or change public id from doctype.

 my $tree = HTML5::DOM->new->parse('
	<!DOCTYPE svg:svg PUBLIC "-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN" "http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg.dtd">
 ');
 
 # get
 print $tree->document->firstChild->publicId; # -//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN
 
 # set
 print $tree->document->firstChild->publicId('-//W3C//DTD SVG 1.1//EN');
 print $tree->document->firstChild->html; # <!DOCTYPE svg:svg PUBLIC "-//W3C//DTD SVG 1.1//EN" "http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg.dtd">

README.pod view on Meta::CPAN

 my $node = $node->systemId($new_system_id);

Return or change public id from doctype.

 my $tree = HTML5::DOM->new->parse('
	<!DOCTYPE svg:svg PUBLIC "-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN" "http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg.dtd">
 ');
 
 # get
 print $tree->document->firstChild->systemId; # http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg.dtd
 
 # set
 print $tree->document->firstChild->systemId('http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd');
 print $tree->document->firstChild->html; # <!DOCTYPE svg:svg PUBLIC "-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">



=head1 HTML5::DOM::Collection

view all matches for this distribution

HTTP-DAV

5 results

view release on metacpan or search on metacpan

doc/html/Changes.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>Changes</title>
<link rel="stylesheet" href="perldav.css" type="text/css" />
<meta http-equiv="content-type" content="text/html; charset=utf-8" />

view all matches for this distribution

HTTP-Daemon-Threaded

2 results

view release on metacpan or search on metacpan

t/03cgi.t view on Meta::CPAN

#
#	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

HTTP-MobileAgent-Plugin-Location

1 match

view release on metacpan or search on metacpan

Changes view on Meta::CPAN

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

HTTP-MobileAgent

4 results

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

HTTP-MobileAttribute

2 results

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

HTTP-ProxyCheck

1 match

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

HTTP-Response-Encoding

5 results

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

HTTP-Session

1 match

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

Handel

3 results

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

HiD

1 match

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

Hopkins-Plugin-HMI

2 results

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

Hyper-Developer

1 match

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

ICC-Profile

1 match

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

IMDB-Film

2 results

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

IO-Compress-Brotli

1 match

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>
< &quot;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&amp;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

IO-HyCon

1 match

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

IO-Moose

8 results

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

IkiWiki-Plugin-syntax

4 results

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>  &lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt;
<span class="synLineNumber">    2</span>  &lt;!DOCTYPE html PUBLIC &quot;-//W3C//DTD XHTML 1.0 Strict//EN&quot;
<span class="synLineNumber">    3</span>   &quot;http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd&quot;&gt;
<span class="synLineNumber">    4</span>  &lt;html xmlns=&quot;http://www.w3.org/1999/xhtml&quot; xml:lang=&quot;es&quot; lang=&quot;es&quot;&gt;
<span class="synLineNumber">    5</span>  
<span class="synLineNumber">    6</span>  &lt;head&gt;
<span class="synLineNumber">    7</span>  	&lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=utf-8&quot; /&gt;

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">&lt;?xml </span><span class="synType">version</span><span class="synIdentifier">=</span><span class="synConstant">&quot;1.0&quot;</span><span class="synIdentif...
<span class="synLineNumber">    2</span>  <span class="synComment">&lt;!DOCTYPE html PUBLIC &quot;-//W3C//DTD XHTML 1.0 Strict//EN&quot;</span>
<span class="synLineNumber">    3</span>  <span class="synComment"> &quot;http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd&quot;&gt;</span>
<span class="synLineNumber">    4</span>  <span class="synIdentifier">&lt;</span><span class="synStatement">html</span><span class="synIdentifier"> xmlns=</span><span class="synConstant">&quot;http://www.w3.org/1999/xhtml&quot;</span><span class="syn...
<span class="synLineNumber">    5</span>  
<span class="synLineNumber">    6</span>  <span class="synIdentifier">&lt;</span><span class="synStatement">head</span><span class="synIdentifier">&gt;</span>
<span class="synLineNumber">    7</span>  <span class="synPreProc">	</span><span class="synIdentifier">&lt;</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

Image-DS9

1 match

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

Image-Epeg

1 match

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

Image-ExifTool

8 results

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

Image-Identicon

1 match

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

Image-Info

1 match

view release on metacpan or search on metacpan

CHANGES view on Meta::CPAN

  * 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

Image-JpegTran-AutoRotate

1 match

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

Image-Magick-Brand

1 match

view release on metacpan or search on metacpan

brand.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>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

Image-Shoehorn-Gallery

2 results

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

Image-Size

2 results

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