| Path : /proc/thread-self/root/proc/self/root/usr/share/doc/gawk/examples/network/ |
|
B-Con CMD Config cPanel C-Rdp D-Log Info Jump Mass Ransom Symlink vHost Zone-H |
| Current File : //proc/thread-self/root/proc/self/root/usr/share/doc/gawk/examples/network/mailpopclient.awk |
BEGIN {
POPService = "/inet/tcp/0/var{emailhost}/pop3"
RS = ORS = "\r\n"
print "user var{name}" |& POPService
POPService |& getline
print "pass var{password}" |& POPService
POPService |& getline
print "retr 1" |& POPService
POPService |& getline
if ($1 != "+OK") exit
print "quit" |& POPService
RS = "\r\n\\.\r\n"
POPService |& getline
print $0
close(POPService)
}