Sono riuscito a configurare iis per questo .pl (funzionante):
--------------
print "Content-type: text/html\n\n";
use Net::POP3;
# variabili
$server = 'in.mailbox.it';
$user = 'miamail@prova.it';
$pwd = 'xxx_yyy';
# Costruttore
$pop = Net::POP3->new($server);
$pop = Net::POP3->new($server, Timeout => 160);
if ($pop->login($user, $pwd) > 0)
{
print "<table border='1' width='750' cellpadding='2' cellspacing='1'>";
print "<tr><td>Connessione stabilita con $server</td></tr>";
my $msgnums = $pop->list; # hashref of msgnum => size
foreach my $msgnum (keys %$msgnums)
{
print "<tr><td>Messaggio n° $msgnum </td></tr>";
my $msg = $pop->get($msgnum);
print "<tr><td> @$msg</td></tr>";
}
print "</table>";
}
$pop->quit;
--------------
Il problema è che non so come richiamare i dati dal form che invia
i valori per $server , $user e $pwd;