use strict;
use  XML::LibXSLT;

my $XML_FILENAME = 'C:\Documents and Settings\z6and\Desktop\PerlXML\skemaer\WX.xml';
my $XSL_FILENAME = 'C:\Documents and Settings\z6and\Desktop\PerlXML\skemaer\WX.xsl';

my $xslt = XML::LibXSLT->New;
my $stylesheet = $xslt->parse_stylesheet_file($XSL_FILENAME);
my $results    = $stylesheet->transform_file($XML_FILENAME);
print $stylesheet->output_string($results);