FunctionalPerl
view release on metacpan or search on metacpan
lib/PXML/XHTML.pm view on Meta::CPAN
323334353637383940414243444546474849505152use
PXML::Element;
our
$nbsp
=
"\xa0"
;
our
$tags
= [
'a'
,
'abbr'
,
'acronym'
,
'address'
,
'applet'
,
'area'
,
'b'
,
'base'
,
'basefont'
,
'bdo'
,
'big'
,
'blockquote'
,
'body'
,
'br'
,
'button'
,
'caption'
,
'center'
,
'cite'
,
'code'
,
'col'
,
'colgroup'
,
'dd'
,
'del'
,
'dfn'
,
'dir'
,
'div'
,
'dl'
,
'dt'
,
'em'
,
'fieldset'
,
'font'
,
'form'
,
'h1'
,
'h2'
,
'h3'
,
'h4'
,
'h5'
,
'h6'
,
'head'
,
'hr'
,
'html'
,
'i'
,
'iframe'
,
'img'
,
'input'
,
'ins'
,
'isindex'
,
'kbd'
,
'label'
,
'legend'
,
'li'
,
'link'
,
'map'
,
'menu'
,
'meta'
,
'noframes'
,
'noscript'
,
'object'
,
'ol'
,
'optgroup'
,
'option'
,
'p'
,
'param'
,
'pre'
,
'q'
,
's'
,
'samp'
,
'script'
,
'select'
,
'small'
,
'source'
,
# not XHTML?, hack
'span'
,
'strike'
,
'strong'
,
'style'
,
'sub'
,
'sup'
,
'table'
,
'tbody'
,
'td'
,
'textarea'
,
'tfoot'
,
'th'
,
'thead'
,
'title'
,
'tr'
,
'tt'
,
'u'
,
'ul'
,
'var'
,
'video'
,
# not XHTML?, hack
];
our
$funcs
= [
map
{
( run in 1.125 second using v1.01-cache-2.11-cpan-49f99fa48dc )