Select Code to Download

 use XML::XSLT;

...
 print $xslt->toString;

 $xslt->dispose();

  use XML::LibXSLT;
  use XML::LibXML;
...
  my $results = $stylesheet->transform($source);

  print $stylesheet->output_as_bytes($results);