router.pl

#!/usr/bin/env perl

use Mojolicious::Routes;
use Mojolicious::Routes::Match;

# Create some routes
my $r = Mojolicious::Routes->new;
$r->get('/:action')->to(controller => 'foo');

# Match method and path against routes
my $m = Mojolicious::Routes::Match->new(GET => '/bar')->match($r);

# Results
print $m->captures->{controller}, "\n";
print $m->captures->{action},     "\n";

# Generate path from route
print $m->path_for(action => 'baz'), "\n";