Help language development. Donate to The Perl Foundation

Router::Boost cpan:MOZNION last updated on 2017-07-01

t/02-capture.t
use v6;
use Test;
use Router::Boost;

subtest {
    my $r = Router::Boost.new();
    dies-ok { $r.add('/blog/{id:(\d+)}', 'dispatch_month') };
}, 'Capture paren is exist';

subtest {
    my $r = Router::Boost.new();
    lives-ok { $r.add('/blog/{id:[\d+]}', 'dispatch_month') };
}, 'Capture paren is not exist';

done-testing;