Net::POP3

[Christian Nielsen <sslug@sslug>]

Jeg er ved at lave et lille script, som kontrollerer en mailserver.
Med understående får jeg et fint svar hvis serveren virker.
$pop = Net::POP3->new('mailserver');
$pop->close();
print "$pop\n";
hvis serveren ikke virker, så dør scriptet med:
Can't call method "close" on an undefined value at TestServer.pl line 18.
Er der nogen som kan hjælpe med at få scriptet til at svare noget 
fornuftigt jeg kan bruge? Scriptet må ikke dø.

MVH,
Christian Nielsen