Select Code to Download

Select or download this

push(@captures, splice(@parts, 0, $capture_attr->[0]));

Select or download this

my @action_captures = splice(@parts, 0, $capture_attr->[0]);
next TRY_ACTION if !$self->match_action_captures( $c, $action, \@actio
+n_captures );
push(@captures, @action_captures);

Select or download this

sub match_action_captures {
    my ( $this, $c, $action, $action_captures ) = @_;
...
        $action->private_path . '_match_captures' );
    return $mc_action ? $c->forward( $mc_action, $action_captures ) : 
+1;
}

Select or download this

sub load_category_match_captures : Private {
    my ( $this, $c, $category ) = @_;

    return scalar grep { $category eq $_ } qw(cosmetics entertainment)
+;
}

Select or download this

package TestApp;

...
@$dp = grep { ( ref($_) || $_ ) ne 'Catalyst::DispatchType::Chained'; 
+} @$dp;
1;

Select or download this
```
/cs/something ....
/en/something ....
```

Select or download this

package TestApp::DispatchType::Chained;
use Moose;
...
    return $mc_action ? $c->forward( $mc_action, $action_captures ) : 
+1;
}