Java::JCR::Query::QueryResult - Perl wrapper for javax.jcr.query.QueryResult

Java-JCR documentation

Contained in the Java-JCR distribution.

Index

NAME
DESCRIPTION
SEE ALSO
AUTHOR
LICENSE AND COPYRIGHT

Code Index:

package Java::JCR::Query::QueryResult
__END__
EOF

NAME

Java::JCR::Query::QueryResult - Perl wrapper for javax.jcr.query.QueryResult

DESCRIPTION

This is an automatically generated package wrapping javax.jcr.query.QueryResult with a nice Perlish API.

For full documentation of what this class does, see the Java API documentation: http://www.day.com/maven/jsr170/javadocs/jcr-1.0/javax/jcr/query/QueryResult.html

The deviations from the API documentation include the following:

You will need to use Perl, intead of Java, to make any use of this API. (Duh.)
The package to use is Java::JCR::Query::QueryResult, rather than javax.jcr.query.QueryResult.
All method names have been changed from Java-style camelCase() to Perl-style lower_case().

Thus, if the function were named getName() in the Java API, it will be named get_name() in this API. As another example, nextEventListener() in the Java API will be next_event_listener() in this API.
Handle exceptions just like typical Perl. Java::JCR::Exception takes care of making sure that works as expected.

SEE ALSO

Java::JCR, http://www.day.com/maven/jsr170/javadocs/jcr-1.0/javax/jcr/query/QueryResult.html

AUTHOR

Andrew Sterling Hanenkamp, <hanenkamp@cpan.org>

LICENSE AND COPYRIGHT

Copyright 2006 Andrew Sterling Hanenkamp <hanenkamp@cpan.org>. All Rights Reserved.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

Java-JCR documentation

Contained in the Java-JCR distribution.

package Java::JCR::Query::QueryResult;

# This code was automatically generated by a combination of the
# JCRPackageGenerator.java and package-generator.pl programs. These are both
# distributed in the inc/ directory of the Java-JCR distribution. You should
# be able to find the latest Java-JCR distribution at:
#
#   http://search.cpan.org/~hanenkamp/Java-JCR/
#

use strict;
use warnings;

use base qw( Java::JCR::Base );

our $VERSION = '0.07';

use Carp;
use Inline (
    Java => 'STUDY',
    STUDY => [],
);
use Inline::Java qw( study_classes );

study_classes(['javax.jcr.query.QueryResult'], 'Java::JCR');

sub get_column_names {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);

    my $result = eval { $self->{obj}->getColumnNames(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }

    return $result;
}

sub get_nodes {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);

    my $result = eval { $self->{obj}->getNodes(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }

    return Java::JCR::Base::_process_return($result, "javax.jcr.NodeIterator", "Java::JCR::NodeIterator");
}

sub get_rows {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);

    my $result = eval { $self->{obj}->getRows(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }

    return Java::JCR::Base::_process_return($result, "javax.jcr.query.RowIterator", "Java::JCR::Query::RowIterator");
}

1;
__END__