for $mk @folders) {
    next if $mk =~ /^\.+$/;