echo |awk '
BEGIN {
        Service = "/inet/tcp/0/pop.163.com/110"
        Service |& getline;
        print;
        print "USER user" |& Service
        Service |& getline;
        print;
        print "PASS pass" |& Service
        Service |& getline;
        print;

        print "LIST" |& Service
        while ((Service |& getline line) > 0 && !(line~/^\./) && ++mailCount) print line;

        mailCount--;
        if (mailCount > 6){

                print "RETR 7" |& Service
                while ((Service |& getline line) > 0 && !(line~/^\./)) print line;
        }
        
        print "QUIT" |& Service

        close(Service)
}'