Re: Is there a unix find equivalent that can be processed inside a perl script?

in reply to Is there a unix find equivalent that can be processed inside a perl script?

use File::Find;

my @filepaths;
find sub { push @filepaths, $File::Find::name if /\.txt$/ }, '.';
  # $_ is set to the current file basename
[download]

Update: Made a fix. Thanks, ikegami.

Comment on Re: Is there a unix find equivalent that can be processed inside a perl script? Download Code

Replies are listed 'Best First'.
Re^2: Is there a unix find equivalent that can be processed inside a perl script? by ikegami (Patriarch) on Sep 20, 2008 at 02:36 UTC
Not quite.	[reply]

In Section Seekers of Perl Wisdom