in reply to shell to perl question

Using one of my few CPAN contributions: 
use File::Finder;
my @files = File::Finder->type('f')->name(qr/\.jp?eg$/)->in('Images');

[download]
No forking, no shell dependency.

-- Randal L. Schwartz, Perl hacker
Be sure to read my standard disclaimer if this is a reply.

In Section Seekers of Perl Wisdom