From 816388554f9aa2cac74e7d50c5d00ec2357cb515 Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Fri, 17 Dec 2004 15:34:09 +0000 Subject: [PATCH] New --- t/2-parser.t | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 t/2-parser.t diff --git a/t/2-parser.t b/t/2-parser.t new file mode 100644 index 0000000..2f2b52c --- /dev/null +++ b/t/2-parser.t @@ -0,0 +1,14 @@ +# $Id: 2-parser.t,v 1.1 2004-12-17 15:34:09 mike Exp $ + +use strict; +use warnings; +use Test::More tests => 2; +BEGIN { use_ok('Net::Z3950::PQF') }; + +my $parser = new Net::Z3950::PQF(); +ok(defined $parser, "created parser"); + +#my $query = '@and @attr 1=1003 kernighan @attr 1=4 unix'; +#my $top = $parser->parse($query); +#ok(defined $top, "parsed query"); + -- 1.7.10.4