path::dispatcher::rule::under(3pm) [debian man page]

Path::Dispatcher::Rule::Under(3pm)			User Contributed Perl Documentation			Path::Dispatcher::Rule::Under(3pm)

NAME

       Path::Dispatcher::Rule::Under - rules under a predicate

SYNOPSIS

	   my $ticket = Path::Dispatcher::Rule::Tokens->new(
	       tokens => [ 'ticket' ],
	       prefix => 1,
	   );

	   my $create = Path::Dispatcher::Rule::Tokens->new(
	       tokens => [ 'create' ],
	       block  => sub { create_ticket() },
	   );

	   my $delete = Path::Dispatcher::Rule::Tokens->new(
	       tokens => [ 'delete', qr/^d+$/ ],
	       block  => sub { delete_ticket(shift->pos(2)) },
	   );

	   my $rule = Path::Dispatcher::Rule::Under->new(
	       predicate => $ticket,
	       rules	 => [ $create, $delete ],
	   );

	   $rule->match("ticket create");
	   $rule->match("ticket delete 3");

DESCRIPTION

       Rules of this class have two-phase matching: if the predicate is matched, then the contained rules are matched. The benefit of this is less
       repetition of the predicate, both in terms of code and in matching it.

ATTRIBUTES

   predicate
       A rule (which must match prefixes) whose match determines whether the contained rules are considered. The leftover path of the predicate is
       used as the path for the contained rules.

   rules
       A list of rules that will be try to be matched only if the predicate is matched.

perl v5.12.4							    2011-08-30					Path::Dispatcher::Rule::Under(3pm)

Path::Dispatcher::Rule::Tokens(3pm)			User Contributed Perl Documentation		       Path::Dispatcher::Rule::Tokens(3pm)

NAME

       Path::Dispatcher::Rule::Tokens - predicate is a list of tokens

SYNOPSIS

	   my $rule = Path::Dispatcher::Rule::Tokens->new(
	       tokens	 => [ "comment", "show", qr/^d+$/ ],
	       delimiter => '/',
	       block	 => sub { display_comment(shift->pos(3)) },
	   );

	   $rule->match("/comment/show/25");

DESCRIPTION

       Rules of this class use a list of tokens to match the path.

ATTRIBUTES

   tokens
       Each token can be a literal string, a regular expression, or a list of either (which are taken to mean alternations). For example, the
       tokens:

	   [ 'ticket', [ 'show', 'display' ], [ qr/^d+$/, qr/^#w{3}/ ] ]

       first matches "ticket". Then, the next token must be "show" or "display". The final token must be a number or a pound sign followed by
       three word characters.

       The results are the tokens in the original string, as they were matched. If you have three tokens, then "match->pos(1)" will be the
       string's first token ("ticket"), "match->pos(2)" its second ("display"), and "match->pos(3)" its third ("#AAA").

       Capture groups inside a regex token are completely ignored.

   delimiter
       A string that is used to tokenize the path. The delimiter must be a string because prefix matches use "join" on unmatched tokens to return
       the leftover path. In the future this may be extended to support having a regex delimiter.

       The default is a space, but if you're matching URLs you probably want to change this to a slash.

   case_sensitive
       Decide whether the rule matching is case sensitive. Default is 1, case sensitive matching.

perl v5.12.4							    2011-08-30				       Path::Dispatcher::Rule::Tokens(3pm)