print NEWFILE "$login\n";
        }
        close (NEWFILE);