(Perl) Test HotMail POP3 (pop3.live.com or pop-mail.outlook.com)

Demonstrates connecting and authenticating to pop3.live.com. Make sure to enable POP3 access, as shown here:

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$mailman = chilkat::CkMailMan->new();

# Connection settings for pop3.live.com (or pop-mail.outlook.com, both should work)
$mailman->put_MailHost("pop-mail.outlook.com");
$mailman->put_MailHost("pop3.live.com");

$mailman->put_PopUsername('my_account@live.com');
$mailman->put_PopPassword("my_live.com_password");
$mailman->put_MailPort(995);
$mailman->put_PopSsl(1);

# Make the TLS connection to the POP3 server.
$success = $mailman->Pop3Connect();
if ($success != 1) {
    print $mailman->lastErrorText() . "\r\n";
    exit;
}

# Authenticate..
$success = $mailman->Pop3Authenticate();
if ($success != 1) {
    print $mailman->lastErrorText() . "\r\n";
    exit;
}

# Find out how many emails are on the server..
$numEmails = $mailman->CheckMail();
if ($numEmails < 0) {
    print $mailman->lastErrorText() . "\r\n";
    exit;
}

# Examine the POP3 session log:
print $mailman->pop3SessionLog() . "\r\n";

# End the POP3 session and close the connection to the POP3 server.
$success = $mailman->Pop3EndSession();
if ($success != 1) {
    print $mailman->lastErrorText() . "\r\n";
    exit;
}

print "-- Finished." . "\r\n";

# The output of this program:

# 	**** Connected to pop3.live.com:995
# 	< +OK DUB006-POP206 POP3 server ready
# 	> USER chilkat@live.com
# 	< +OK password required
# 	> PASS ****
# 	< +OK User successfully authenticated. [AuthResult=0 Proxy=CY1PR17MB0630.namprd17.prod.outlook.com:1995:SSL]
# 	> STAT
# 	< +OK 46 3980488
# 
# 	-- Finished.
#