my @files = find(
   file =>
   name => '*.dpt',
   grep => qr/pattern/,
   in => $dir,
);