X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=bin%2Firspy_xsltproc.pl;h=03e641df39c5ce6af43c3b1750cc9d0793c73fa4;hp=e2cf45d3fabf8e160043af125e0c879f9851cada;hb=bd0b8f76673fd975b6d8b3417e55acb8bbaa3dbc;hpb=e04a51eb8137d29b22ff514f4c226192fbd530b8 diff --git a/bin/irspy_xsltproc.pl b/bin/irspy_xsltproc.pl index e2cf45d..03e641d 100755 --- a/bin/irspy_xsltproc.pl +++ b/bin/irspy_xsltproc.pl @@ -1,6 +1,13 @@ #!/usr/bin/perl -w -# $Id: irspy_xsltproc.pl,v 1.2 2007-02-02 12:40:51 sondberg Exp $ +# $Id: irspy_xsltproc.pl,v 1.4 2007-06-28 13:57:53 sondberg Exp $ +# ------------------------------------------------------------------ +# This script is only for debugging purposes - it takes a raw IRspy +# xml output document as argument and executes the irspy2zeerex.xsl +# transformation right in front of you: +# +# ./irspy_xsltproc.pl irspy_output_raw.xml +# use strict; use warnings; @@ -18,4 +25,4 @@ my $source_file = shift || die("$0: Please specify xml instance file"); my $source_doc = $spy->{libxml}->parse_file($source_file); my $results = $spy->{irspy_to_zeerex_style}->transform($source_doc); -print $results->toString(); +print $results->toString(1);