One of a list of strings must match
my $rule = Path::Dispatcher::Rule::Enum->new(
enum => [qw(perl ruby python php)],
block => sub { warn "I love " . shift->pos(1) },
);
Rules of this class check whether the path matches any of its \*(L"enum\*(R" strings.