route_param regex is broken by R::Routes::Endpoint::_build_regex if contains quantifiers...

[lmasarati]

Hello,
I think there could be a problem with the line

$regex =~ s/[{}]//g;

in Raisin::Routes::Endpoint

sub _build_regex {
    my $self = shift;
    return $self->path if ref($self->path) eq 'Regexp';
 
    my $regex = $self->path;
 
    $regex =~ s/(.?)([:*?])(\w+)/$self->_rep_regex($1, $2, $3)/eg;
    $regex =~ s/[{}]//g;
 
    # Allows any extensions
    $regex .= "(?:\\\.[^.]+?)?";
 
    qr/^$regex$/;
}

If I define a route_param as

resource 'backup' => sub {
	params (
		requires('sessionId',
			type => Str,
			regex => qr/^[a-f0-9]{32}$/
		)
	);
	route_param 'sessionId' => sub {
...

then the aforementioned line translates the regex to

'regex' => qr/^\/backup\/(?<sessionId>(?i:[a-f0-9]32))(?:\.[^.]+?)?$/,

The workaround is to remove the regex from params definition, leaving as generic Str and check it later during the execution of sub...