Skip Menu |
 

This queue is for tickets about the Net-Z3950-ZOOM CPAN distribution.

Report information
The Basics
Id: 34092
Status: new
Priority: 0/
Queue: Net-Z3950-ZOOM

People
Owner: Nobody in particular
Requestors: jcw [...] odikia.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: ZOOM Error: Failure of title search based upon documentation.
Date: Fri, 14 Mar 2008 10:50:53 -0700
To: bug-Net-Z3950-ZOOM [...] rt.cpan.org
From: John Watkins <jcw [...] odikia.com>
irst the relevant background info: Net-Z3950-ZOOM version 1.21 Yaz version 3.0.20 Mac OSX 10.4.11 on a 1.83 GHz Intel core Duo, MacBook Pro. Appended below are three examples that were cobbled together using the documentation for the Zoom perl module. They are labeled Example 1, Example 2, and Example 3. These examples differ in only one line. The particular line is shown in a bold font in each example. The the search()/search_pdf() documentation is the source of the three examples of searches. [ In the example the word 'dinosaur' was used for the search. Given the database used here that produced zero results I substituted of 'mineral'] ####### Example 1 and Example 2 produced the following output: Show quoted text
>perl -w z3950_1.pl
00943n 2200157z 4504 245 $a UTAH GEOLOGICAL AND MINERAL SURVEY PUBLICATIONS 710 $a UTAH GEOLOGICAL AND MINERAL SURVEY 520 $a Publications of the Utah Geological and Mineral Survey include reports of investigation, special studies, bulletins, open-file reports, geologic map of Utah, publications of geological societies, geologic and oil and mineral maps, coal monographs, circulars, water resource bulletins, and reprints of articles. 513 $b -PRESENT 270 $p UTAH GEOLOGICAL AND MINERAL SURVEY $a INFORMATION SECTION, 606 BLACK HAWK WAY $b SALT LAKE CITY $d USA $k (801) 581-6831 037 $f UTAH GEOLOGICAL AND MINERAL SURVEY PUBLICATIONS 506 $a NONE 540 $a OPERATIONAL 270 $p UTAH GEOLOGICAL AND MINERAL SURVEY $a INFORMATION SECTION, 606 BLACK HAWK WAY $b SALT LAKE CITY $d USA $k (801) 581-6831 035 $a ESDD0007 040 $a UTAH GEOLOGICAL AND MINERAL SURVEY 00900n 2200145z 4504 245 $a MINERAL OCCURRENCES, DEPOSITS, PROSPECTS, AND MINES 710 $a NEVADA BUREAU OF MINES AND GEOLOGY 520 $a Name, location, workings, geologic description, history of development and mining (if any), analyses of rocks and minerals, and references are components of this database. 513 $b 1970-PRESENT 270 $p NEVADA BUREAU OF MINES AND GEOLOGY $a NEVADA BUREAU OF MINES AND GEOLOGY, UNIVERSITY OF NEVADA $b RENO $d USA $k (702) 784-6691 037 $f MINERAL OCCURRENCES, DEPOSITS, PROSPECTS, AND MINES 506 $a As an area is covered, the data is open-filed at the Nevada Bureau of Mines and Geology. 270 $p JOE TINGLEY $p NEVADA BUREAU OF MINES AND GEOLOGY $a NEVADA BUREAU OF MINES AND GEOLOGY, UNIVERSITY OF NEVADA $b RENO $d USA $k (702) 784-6691 035 $a ESDD0048 040 $a NEVADA BUREAU OF MINES AND GEOLOGY ######## Example 3, however produced a ZOOM error 107: Show quoted text
> perl -w z3950_1.pl
ZOOM error 107 "Query type not supported" from diag-set 'Bib-1' This seems to be an error based upon the documentation. I presume the output should be s listing of titles with the word 'mineral' in them. ####### Example 1 #################################### use ZOOM; my $conn = new ZOOM::Connection("indexdata.dk:210/gils"); $conn->option(preferredRecordSyntax => "usmarc"); my $rs = $conn->search(new ZOOM::Query::PQF('@attr 1=4 mineral')); my $n = $rs->size(); for $i (1 .. $n) { my $rec = $rs->record($i-1); print $rec->render(); } if ($conn->errcode() != 0) { die("somthing went wrong: " . $conn->errmsg() . "\n"); } $conn->destroy(); ####### Example 2 #################################### use ZOOM; my $conn = new ZOOM::Connection("indexdata.dk:210/gils"); $conn->option(preferredRecordSyntax => "usmarc"); my $rs = $conn->search_pqf('@attr 1=4 mineral'); my $n = $rs->size(); for $i (1 .. $n) { my $rec = $rs->record($i-1); print $rec->render(); } if ($conn->errcode() != 0) { die("somthing went wrong: " . $conn->errmsg() . "\n"); } $conn->destroy(); ####### Example 3 #################################### use ZOOM; my $conn = new ZOOM::Connection("indexdata.dk:210/gils"); $conn->option(preferredRecordSyntax => "usmarc"); my $rs = $conn->search(new ZOOM::Query::CQL('title=mineral')); my $n = $rs->size(); for $i (1 .. $n) { my $rec = $rs->record($i-1); print $rec->render(); } if ($conn->errcode() != 0) { die("somthing went wrong: " . $conn->errmsg() . "\n"); } $conn->destroy();
Download (untitled) / with headers
text/html 10.3k


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.