NAME

Net::ACL::Match::Regexp - Class matching a scalar data element

SYNOPSIS

use Net::ACL::Match::Regexp;

# Construction
my $match = new Net::ACL::Match::Regexp(['^65001 [0-9 ]+ 65002$', 2]);

# Accessor Methods
$rc = $match->match(@data); # same as: $data[1] eq 42 ? ACL_MATCH : ACL_NOMATCH;

DESCRIPTION

This module is a very simple array element testing with regular expression utility to allow simple value matching with Net::ACL::Rule.

CONSTRUCTOR

my $match = new Net::ACL::Match::Regexp(['^65001 [0-9 ]+ 65002$',2]);

This is the constructor for Net::ACL::Match::Regexp objects. It returns a reference to the newly created object.

It takes one argument. If the argument is a array reference with one element, the element will be used as a regular expression pattern to matched with the first argument to the match method.

If an array reference has more then one element, the second element should be the argument number to be matched in the match method.

Otherwise, the value it self will be used as a regular expression pattern to match the first argument of the match method.

ACCESSOR METHODS

match()

This function matches the arguments according to the arguments of the constructor and returns either ACL_MATCH or ACL_NOMATCH as exported by Net::ACL::Rule with :rc.

SEE ALSO

Net::ACL::Match, Net::ACL::Rule, Net::ACL

AUTHOR

Martin Lorensen <bgp@martin.lorensen.dk>