$dir = 'datas';
opendir DIR, $dir or die "Can't open $dir: $!";
my @files = grep -f "$dir/$_" && ! /\.html$|\.csv$/, readdir DIR;
closedir DIR;