Skip to content

Instantly share code, notes, and snippets.

@smls

smls/find-files.p6 Secret

Last active August 15, 2016 15:02
Show Gist options
  • Save smls/e4adead89c3aa8dcefd945725d2cd803 to your computer and use it in GitHub Desktop.
Save smls/e4adead89c3aa8dcefd945725d2cd803 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
find-files.p6
sub find-files ($dir, Mu :$test) {
gather for dir $dir -> $path {
if $path.basename ~~ $test { take $path }
if $path.d { .take for find-files $path, :$test };
}
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment