From 7f89f2b8fbbd92ec110c65aec9b1ead25e6aaec7 Mon Sep 17 00:00:00 2001 From: "Anders S. Mortensen" Date: Fri, 2 Feb 2007 12:38:48 +0000 Subject: [PATCH] Added irspy_xsltproc script which has the right irspy environment. --- bin/irspy_xsltproc.pl | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100755 bin/irspy_xsltproc.pl diff --git a/bin/irspy_xsltproc.pl b/bin/irspy_xsltproc.pl new file mode 100755 index 0000000..6de21da --- /dev/null +++ b/bin/irspy_xsltproc.pl @@ -0,0 +1,16 @@ +#!/usr/bin/perl -w + +# $Id: irspy_xsltproc.pl,v 1.1 2007-02-02 12:38:48 sondberg Exp $ + +use strict; +use warnings; +use lib '../lib'; +use ZOOM::IRSpy; + +my $dbname = 'localhost:8018/IR-Explain---1'; +my $spy = new ZOOM::IRSpy($dbname, "admin", "fruitbat"); +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(); -- 1.7.10.4