next if ($name =~ /^(\.\.?)$)/);