NAME

List::Haystack - A immutable list utility to find element

SYNOPSIS

Basic (not lazy mode)

use List::Haystack;

my $haystack = List::Haystack->new([qw/foo bar foo/]); # <= create internal structure here

$haystack->find('foo'); # <= 1 (true value)
$haystack->find('bar'); # <= 1 (true value)
$haystack->find('xxx'); # <= 0 (false value)

$haystack->cnt('foo'); # <= 2 (number of occurrences)
$haystack->cnt('bar'); # <= 1 (number of occurrences)
$haystack->cnt('xxx'); # <= 0 (number of occurrences)

Lazy

use List::Haystack;

my $haystack = List::Haystack->new([qw/foo bar foo/], {lazy => 1});

$haystack->find('foo'); # <= 1 (true value, create internal structure here)
$haystack->find('bar'); # <= 1 (true value)
$haystack->find('xxx'); # <= 0 (false value)

$haystack->cnt('foo'); # <= 2 (number of occurrences)
$haystack->cnt('bar'); # <= 1 (number of occurrences)
$haystack->cnt('xxx'); # <= 0 (number of occurrences)

DESCRIPTION

List::Haystack is a utility to find element for list. This module works immutably.

This module converts the given list to internal structure to find the element fast. This conversion runs only at once. That is to say, if you want to modify the target of list, you must create new instance of this module.

METHODS

new($list: ArrayRef|undef, $option: HashRef): List::Haystack

A constructor. $list is a target of list to find. It must be ArrayRef or undef; if undef is given, find and cnt always return 0.

$option is an HashRef argument of option. If you specify lazy, it puts off creation the internal structure until instance method is called (i.e. constructor doesn't create internal structure).

e.g. List::Haystack->new([...], {lazy => 1}

haystack(): HashRef

A getter method. This method returns a HashRef that contains element as key and number of occurrences as value.

find($element: Any): Bool

This method returns whether given list contains $element or not.

cnt($element: Any): Int

This method returns number of occurrences of given $element.

LICENSE

Copyright (C) moznion.

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

AUTHOR

moznion <moznion@gmail.com>