HTML-StickyQuery
2 results

 view release on metacpan or  search on metacpan

t/14xhtml.t  view on Meta::CPAN 


use Test::More tests => 2;
use HTML::StickyQuery;
use CGI;

my $s = HTML::StickyQuery->new;
my $q = CGI->new();
$s->sticky(
    file => './t/xhtml.html',
    param => $q,
);

like($s->output, qr/<\?xml version="1.0" encoding="utf-8"\?>/);
like($s->output, qr(<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1\.0 Transitional//EN"));



( run in 1.495 second using v1.01-cache-2.11-cpan-119454b85a5 )