|
I always use the File::Find module to so.
http://search.cpan.org/~nwclark/perl-5.8.5/lib/File/Find.pm
use File::Find;
find(\&wanted, @directories_to_search);
sub wanted {
if (/\.jpg$) { ...do something with exif ... } #just do this if $_ is a jpeg file
}
Hope this hint is helpful
Kind regards
Andreas
|
