#! perl
use strict;
use warnings;
use File::Find;

my @filtered = (...);
my @files;

find(sub { push @files, $File::Find::name if /\.lef$/ } , @filtered); 

# access @files as needed