print STDERR "FIRST $self->{template}\n";
    my $xslt = XML::XSLT->new(Source =>  $self->{xslfile});
    print STDERR "SECND $self->{template}\n";