Re: Unspecified error (was Re: Z3950 returning two records?)

I don't quite know how the code looks, but if you eliminate this loop don't
you let the case where n = 0 slip thru, so you will try to access record 
1 even when there
is none?
just my 2 cents,
Rick

Sharif Islam wrote:
> I am using the same script to go though a text file that contains 
> issn. After returning the subject for 20 entires (out of 500), the script
> stop with the error mesage:
> "Unspecified error at test.pl line 29"
> line 29 is : my $rec = $rs->record(1)
> The original code was:
> for (my $i = 1; $i <= $n; $i++) {
> my $rec = $rs->record($i)
>       or die $rs->errmsg();
> my $m = MARC::Record->new_from_usmarc($rec->rawdata());
> print $m->subfield('650',"a"), "\n";
>
> To get only one entry I got rid of the for loop:
>
>      my $rec = $rs->record(1)
>         or die $rs->errmsg();
>    my $m = MARC::Record->new_from_usmarc($rec->rawdata());
>    print "$issn\t";
>    print $m->subfield('650',"a"), "\n";
>
> Any idea? Thanks.
>
> --sharif
>
>
> Sharif Islam wrote:
>
>> I have this simple scripts that looks up ISSN and returns the 
>> subject. Why it is returning two records for the same ISSN?
>> use strict;  use Net::Z3950;
>> use MARC::Record;
>> use MARC::File::USMARC;
>> use MARC::Field;
>>
>>
>> my $conn = new Net::Z3950::Connection('z3950.loc.gov', 
>> 7090,databaseName => 'Voyager');
>> my $issn="0896-9205";
>> my $query = '@attr 1=8 ' . $issn;
>> $conn->option(preferredRecordSyntax => "USMARC", elementSetName => 'b');
>> my $rs = $conn->search($query)
>>        or die $conn->errmsg();
>> my $n = $rs->size();
>> print "found $n records\n";
>> for (my $i = 1; $i <= $n; $i++) {
>>  my $rec = $rs->record($i)
>>        or die $rs->errmsg();
>> my $m = MARC::Record->new_from_usmarc($rec->rawdata());
>> print $m->subfield('650',"a"), "\n";
>> #print $rec->render();
>> }
>>
>> # perl test.pl
>> found 2 records
>> Sociology
>> Sociology
>>
>
>


-- 
******************************
Enrico Silterra
Meta Data Engineer
107-E Olin Library
Cornell University
Ithaca NY 14853

Voice: 607-255-6851
Fax:     607-255-6110
E-mail: [email protected]
http://www.library.cornell.edu/cts/
"We must walk consciously only part way toward our goal, and then leap in the dark to our success."  - - Thoreau
******************************