Select Code to Download

BEGIN {
    use Path::Tiny;
...
    $base = $base->parent until -f "$base/.some-dot-file" or $base->is
+_rootdir;
    unshift @INC, "$base/lib";
}