package PSQL::Query::Token::Row;
use Moose;

extends 'PSQL::Query::Token';

has 'name' => (
	isa       => 'Str'
	, is      => 'rw'
	, lazy    => 1
	, default => \&get_name
);

sub get_name {
	my $self = shift;

	$self->src =~ /^\s*(?:->  )?(.*?)\s*[(:]/;

	$1;

}

1;