File Coverage

lib/Neo4j/Types/Node.pm

Criterion	Covered	Total	%
statement	22	22	100.0
branch	8	8	100.0
condition			n/a
subroutine	7	7	100.0
pod	4	4	100.0
total	41	41	100.0

use strict;
use warnings;

package Neo4j::Types::Node;
# ABSTRACT: Describes a node from a Neo4j graph
$Neo4j::Types::Node::VERSION = '1.00';

use Carp qw(croak);


sub get {
	my ($self, $property) = @_;

	return unless defined $self->{properties};
	return $self->{properties}->{$property};
}


sub id {
	my ($self) = @_;

	return $self->{id};
}


sub labels {
	my ($self) = @_;

	croak 'labels() in scalar context not supported' unless wantarray;
	return unless defined $self->{labels};
	return @{$self->{labels}};
}


sub properties {
	my ($self) = @_;

	return {} unless defined $self->{properties};
	return $self->{properties};
}


1;

__END__