3 # $Id: irspy_xsltproc.pl,v 1.1 2007-02-02 12:38:48 sondberg Exp $
10 my $dbname = 'localhost:8018/IR-Explain---1';
11 my $spy = new ZOOM::IRSpy($dbname, "admin", "fruitbat");
12 my $source_file = shift || die("$0: Please specify xml instance file");
13 my $source_doc = $spy->{libxml}->parse_file($source_file);
14 my $results = $spy->{irspy_to_zeerex_style}->transform($source_doc);
16 print $results->toString();