view release on metacpan or  search on metacpan

lib/Text/Index.pm  view on Meta::CPAN

		@{$self->{pages}} = $proto->pages;
		foreach ($proto->keywords) {
			my $clone =  {
				key => $_->[0],
				deriv => [ @{ $_->[1] } ],
			};
			$self->{keywords}{$_->[0]} = $clone;
		}
	}

	return bless $self => $class;
}

=item add_page

Adds a page to the index object. The page is expected to be
a string of text passed in as first argument.

Returns the Text::Index object for convenience of
method chaining.