my @files = grep { /png|gif|jpg|tiff$/ } (readdir(DIR));