use File::Find;
...
sub _find_jpg {
      my @files;
      find( sub{ push @files, $_ if /\.jpg$/i }, @_ );
      \@files;
}