Walk a directory/Recursively: Difference between revisions
Content added Content deleted
(omit from Unlambda) |
(→{{header|Perl 6}}: start the section) |
||
Line 604:
my $pattern = 'foo';
find sub {print $File::Find::name if /$pattern/}, $dir;</lang>
=={{header|Perl 6}}==
Uses File::Find from [http://github.com/tadzik/perl6-File-Tools File-Tools]
<lang perl6>use File::Find;
.say for find(dir => '.').grep(/foo/);</lang>
=={{header|PHP}}==
| |||