Select Code to Download

sub _findPaths3 {
    return $_[0]->( @{ $_[4] }, $_[3] ) if $_[2] eq $_[3];
...
}

sub findPaths3(&@) { _findPaths3( @_, [] ); }