X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=samples%2Fzoom%2Fzselect;h=8ff754bb506b68ac07c115e0ee388b88b45bf1e4;hb=a032022a32bbc0d1ed46990ca8e79889ce41cb1f;hp=d0f8c0a885d34463e5e5f4903f323fff81bd00f8;hpb=3aeb5c8fcd330a83d291db095581ea8225a4dc15;p=ZOOM-Perl-moved-to-github.git diff --git a/samples/zoom/zselect b/samples/zoom/zselect index d0f8c0a..8ff754b 100755 --- a/samples/zoom/zselect +++ b/samples/zoom/zselect @@ -1,6 +1,9 @@ #!/usr/bin/perl -w -# $Id: zselect,v 1.1 2006-09-25 11:43:21 mike Exp $ +# $Id: zselect,v 1.3 2007-04-18 11:18:08 mike Exp $ + +# Example command-line: +# ./zselect -t q localhost:3313/IR-Explain---1 "net.port=3950" "concat(zeerex:serverInfo/zeerex:host, ':', zeerex:serverInfo/zeerex:port, '/', zeerex:serverInfo/zeerex:database)" use strict; use warnings; @@ -67,5 +70,6 @@ foreach my $i (1..$n) { sub register_namespaces { my($xc) = @_; $xc->registerNs(zeerex => 'http://explain.z3950.org/dtd/2.0/'); + $xc->registerNs(irspy => 'http://indexdata.com/irspy/1.0'); # More to come }