use Test; BEGIN { plan tests => 5 } use XML::GDOME::XSLT; my $parser = XML::GDOME->new(); my $xslt = XML::GDOME::XSLT->new(); ok($parser); ok($xslt); my $source = $parser->parse_string(<<'EOT'); EOT my $style = $parser->parse_string(<<'EOT'); EOT ok($style); my $stylesheet = $xslt->parse_stylesheet($style); my $results = $stylesheet->transform($source); ok($results); ok($stylesheet->media_type, 'text/html');