print "$file\n" if $file !~ /\A\.{1,2}\Z/;