XML::Filter::XSLT (3pm)

  use XML::SAX::ParserFactory;
  use XML::Filter::XSLT;
  use XML::SAX::Writer;

  my $writer = XML::SAX::Writer->new();
  my $filter = XML::Filter::XSLT->new(Handler => $writer);
  my $parser = XML::SAX::ParserFactory->parser(
                  Handler => $filter);
  $filter->set_stylesheet_uri("foo.xsl");
  $parser->parse_uri("foo.xml");