[Dresden-pm] Bugfix in Perl SMTP Server

[martin]

Hallo,

soweit ich das verstanden habe ist diese Zeile für das Parsen der 
E-Mails in Absender, Nachricht und Empfänger zuständig:

my $client = new Net::SMTP::Server::Client($conn) || next;

Lasse ich mir jedoch direkt nach dieser Zeile mittels Dumper den Inhalt 
von $client ausgeben, so enthält dieser keinen Absender, keine Nachricht 
und keinen Empfänger:

print Dumper($client)."\n";

Gleiches passiert mir sogar mit dem Beispielscript von der 
Net::SMTP::Server CPAN-Seite:

http://search.cpan.org/~macgyver/SMTP-Server-1.1/Server.pm#SYNOPSIS

Gesendet habe ich die Mail mittels Thunderbird (einfach einen 
Postausgangsserver angelegt) sowie poMMo (http://pommo.org/)

Viele Grüße,

martin



Aristoteles Pagaltzis schrieb:
> Hi Martin,
>
> * martin <martin at suedvorstadt.de> [2010-06-08 21:15]:
>   
>> meine Perl Kenntnisse sind leider nicht ausreichend genug um
>> das Problem genauer zu untersuchen. Ich vermute das Net::SMTP
>> einfach die empfangenen Daten nicht korrekt in Empfänger,
>> Sender und Nachricht zerlegen kann.
>>     
>
> wie äussert es sich denn soweit du es nachvollziehen kannst?
> Schlägt die Annahme der Mail fehl, klappt der Versand nicht, oder
> irgendwas ganz anderes?
>
>   
>> Das Skript gibt es hier:
>> http://pastie.org/private/ehtqj0eweulfdtf7wosqkw
>>
>> Wie könnte man herausfinden ob es Beispielsweise am Encoding
>> liegt?
>>     
>
> Das Skript sieht nach einem ziemlich rudimentären Server aus… es
> könnte fast als Beispielcode herhalten. Ohne irgendeinen Hinweis
> darauf, was für Problem in der Praxis *überhaupt* auftritt, kann
> man nur blind raten, ob und wie der Code fehlerhaft sein könnte…
>
> (Oder den Quellcode sämtlicher Module komplett auditieren… dafür
> wirst du aber kaum jemanden finden… Davon abgesehen vermutest du
> erschwerenderweise, daß die Module lokal verändert sind – dann
> kann man dir ohne Einblick schon gar nicht helfen.)
>
> Gruß,
>