Changeset View
Changeset View
Standalone View
Standalone View
swh/web/tests/resources/contents/code/extensions/test.awk
- This file was added.
BEGIN { | |||||
POPService = "/inet/tcp/0/emailhost/pop3" | |||||
RS = ORS = "\r\n" | |||||
print "user name" |& POPService | |||||
POPService |& getline | |||||
print "pass 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) | |||||
} | |||||
No newline at end of file |