next if $file =~ /^\.+$/; # no longer recommended. see below