$rss->parse($xml);
$rss->{output} = '0.91';
$xml=$rss->as_string;

my $xslt       = XML::LibXSLT->new();
my $xml_parser = XML::LibXML->new();
$xml_parser->keep_blanks(0);
$xml_parser->load_ext_dtd(0);

my $source_xml = $xml_parser->parse_string($xml);
my $style_xsl  = $xml_parser->parse_file($style);
my $stylesheet = $xslt->parse_stylesheet($style_xsl);
my $result_xml = $stylesheet->transform($source_xml);	
print $stylesheet->output_string($result_xml);