Use a regex. :)

$ext_re = '\.(?:' . join('|', @exts) . ')$';

find(\&wanted, $root);

sub wanted {
  if (/$ext_re/o) {
    print "$File::Find::dir/$hold\n";
  }
}
[download]

The $ anchor is important if your filenames can contain multiple periods.