X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=perl%2Flib%2FIDZebra%2FResultset.pm;h=0831d9d6a05ef476dd5d265e965cf8f1e9a5bed5;hb=a9d007b7f9024da4d8e04370fcb9063ec1816378;hp=dd40ad12be3b091533d15bf1d34ebeb8152fa854;hpb=dc3c04329444e64a53fb799adb40bbb6370b3f1b;p=idzebra-moved-to-github.git diff --git a/perl/lib/IDZebra/Resultset.pm b/perl/lib/IDZebra/Resultset.pm index dd40ad1..0831d9d 100644 --- a/perl/lib/IDZebra/Resultset.pm +++ b/perl/lib/IDZebra/Resultset.pm @@ -37,6 +37,21 @@ sub new { return ($self); } +sub count { + my ($self) = @_; + return ($self->{recordCount}); +} + +sub errCode { + my ($self) = @_; + return ($self->{errCode}); +} + +sub errString { + my ($self) = @_; + return ($self->{errCode}); +} + sub DESTROY { my ($self) = @_; @@ -102,16 +117,30 @@ sub sort { } } +# ============================================================================ __END__ =head1 NAME -IDZebra::Session - +IDZebra::Resultset - Representation of Zebra search results =head1 SYNOPSIS =head1 DESCRIPTION +The I object represents results of a Zebra search. Contains number of hits, search status, and can be used to sort and retrieve the records. + +=head1 PROPERTIES + + $count = $rs->count; + + printf ("RS Status is %d (%s)\n", $rs->errCode, $rs->errString); + +I<$rs-EerrCode> is 0, if there were no errors during search. + +=head1 RETRIEVING RECORDS + + =head1 COPYRIGHT Fill in