nicht angemeldet
Hallo,
ich versuche einen normalen Pop3-Account bei Puretec mit einem cgi-script abzufragen.
Ein Bekannter hat so ein Script auch geschreiben, ich habe es installiert und es läuft auch - bis zu der Stelle, an der der Mailserver abbricht und den Zugang verweigert.
Gefunden wird der Server wohl, das Script wird auch ausgeführt, bricht aber, wie gesagt, ab.
Die Fehlermeldung:
"- 255 CGI returned nonzero status
e Can't Authenticate:
e
- STDOUT OK STDERR OK"
Und hier der entscheidende Teil des Scripts:
_________________________start_________________________________
Net::POP3 is used to access a POP3 mailbox. A POP3 mailbox must be
configured for each mailing list implementing this feature. All
email contained in this POP3 mailbox when the script is run will
be sent to all recipients on the mailing list.
use Net::POP3;
Define local variables. Used to access mailbox on POP3 server.
my $popServer = "pop.puretec.de";
my $popUser = "xxxxxxxxx";
my $popPass = "xxxxxxxx";
Define local variables. Used to locate base path to MOJO script
my $mojoPath = "/homepages/xx/xxxxxxxxxx/xxxxxxx/xxxxx/mojo";
Construct a new Net::POP3 object
$pop = Net::POP3->new($popServer)or die "Can't Connect to Mail Server:
$!\n";;
Logon to the specified mailbox on the POP3 server.
Number of existing messages returned.
$numMessages=$pop->login($popUser, $popPass) or die "Can't Authenticate:
$!\n";
Sequentially process each of the existing messages in
the specified mailbox.
for ($thisMessage = 1; $thisMessage <= $numMessages; $thisMessage++) {
Get the message $thisMessage from the POP3 mailbox.
$messageText = $pop->get($thisMessage) or die "Can't Get Undeleted
Messages:
$!\n";;
_________________________stopp_________________________________
Von einem anderen cgi-account funktionierte die Abfrage problemlos und die puretec-Hotline erklärte mir, dass es auch möglich sei, Mails so abzufragen.
Hat jemand eine Icdee, was ich falsch gemacht habe?