Re: MIME:Lite

Re: MIME:Lite

am 21.02.2006 11:56:12 von Stefan Kristukat

Wichtiger Nachtrag
ich vermute das Problem kann reduziert werden. Ich habe feststellen
müssen, dass ich zwar eine Attachment Icone in meinem Mailclient
angezeigt bekomme, das Attachment jedoch leer ist. Schande über mich.
Vermutlich bekomme ich deswegn nichts angezeigt. :-)
Was mache ich dann bei der Benutzung von MIME::Lite falsch - Text kann
ich ja verschicken?

Vielen Dank für Eure Hilfe

Gruss Stefan

Stefan Kristukat wrote:
> Hallo zusammen,
> ich habe versucht mit folgender Funktion ein Bild per Mail zu
> verschicken. Das klappt auch, nur würde ich es gerne beim Öffnen der
> Mail sehen und nicht nur als Attachment bekommen. In diesem Fall muss
> ich es ja erst abspeichern bzw. in einem externen Viewer öffnen .
> Ich habe einen Teil des Mailheaders der Mail wie ich sie bekomme
> (Mailclient Firefox) angehängt. Ein weitere Mailheader zeigt wie ich es
> gerne hätte (hier wird das Bild bereits im Client dargestellt) - er ist
> entstanden als ich mit phyton experimentiert habe. Ich will aber
> eigentlich bei Perl bleiben !
> Würde mich freuen, wenn mir da jemand weiter helfen könnte.
>
> Grüsse
>
>
> Stefan Kristukat
>
>
>
>
>
>
> sub schicken{
> my $msg=0;
> $msg = MIME::Lite->new(From => 'stefan.kristukat@hoc.net',
> To => 'stefan.kristukat@hoc.net',
> Subject => "Burki du $string2 send my sk\@lttwww",
> Type => 'image/jpeg',
> Path => './',
> Filename => "$string2\_$title.jpg");
>
> $msg->send('smtp', 'mail.epfl.ch');
> }
>
> ------------------------------------------------------------ ----------------
>
> Mailheader nach Versand mit Perl Mime::Lite
> ------------------------------------------------------------ ----------------
>
>
> MIME-version: 1.0
> X-Mailer: MIME::Lite 3.01 (F2.72; T1.06; A1.58; B2.20; Q2.20)
> Content-type: image/jpeg;name="Burki_2006_02_21.jpg"
> Content-transfer-encoding: base64
> Content-disposition: inline; filename="Burki_2006_02_21.jpg"
> Delivered-to: stefan.kristukat@hoc.net
> Original-recipient: rfc822xxxxxxxxxxxxxxxxxxxxxxxxxxx
>
>
>
> ------------------------------------------------------------ ----------------
>
> so will ich es haben; habe ich hinbekommen mit Python
> ------------------------------------------------------------ ----------------
>
> .....
>
> MIME-version: 1.0
> Content-type: multipart/mixed; boundary="/9DWx/yDrRhgMJTb"
> Content-disposition: inline
> Delivered-to: stefan.kristukat@hoc.net
> User-Agent: Mutt/1.4.1i
> Original-recipient: rfc822xxxxxxxxxxxxxxxxxxxxxxxxxxx
>
> --/9DWx/yDrRhgMJTb
> Content-Type: text/plain; charset=us-ascii
> Content-Disposition: inline
>
> send by sk@lttwww
>
> --/9DWx/yDrRhgMJTb
> Content-Type: image/jpeg
> Content-Disposition: attachment; filename="Burki_2006_02_21.jpg"
> Content-Transfer-Encoding: base64
>
> /9j/4AAQSkZJRgABAgEASABIAAD/4ROWRXhpZgAATU0AKgAAAAgABwESAAMA AAABAAEAAAEa
> AAUAAAABAAAAYgEbAAUAAAABAAAAagEoAAMAAAABAAIAAAExAAIAAAAUAAAA cgEyAAIAAAAU
> .....

Re: MIME:Lite

am 21.02.2006 11:59:14 von Stefan Kristukat

Hier die aktuelle Version der Funtkion, in der ich auch den komischen
Filenamen entfernt habe.

sub schicken2{
my $msg=0;
$msg = MIME::Lite->new(From => 'stefan.kristukat@hoc.net',
To => 'stefan.kristukat@hoc.net',
Subject => " test",
Type => 'image/jpeg',
Path => './',
Filename => "$file");

$msg->send('smtp', 'hoc.net');
}






Stefan Kristukat wrote:
> Wichtiger Nachtrag
> ich vermute das Problem kann reduziert werden. Ich habe feststellen
> müssen, dass ich zwar eine Attachment Icone in meinem Mailclient
> angezeigt bekomme, das Attachment jedoch leer ist. Schande über mich.
> Vermutlich bekomme ich deswegn nichts angezeigt. :-)
> Was mache ich dann bei der Benutzung von MIME::Lite falsch - Text kann
> ich ja verschicken?
>
> Vielen Dank für Eure Hilfe
>
> Gruss Stefan
>
> Stefan Kristukat wrote:
>> Hallo zusammen,
>> ich habe versucht mit folgender Funktion ein Bild per Mail zu
>> verschicken. Das klappt auch, nur würde ich es gerne beim Öffnen der
>> Mail sehen und nicht nur als Attachment bekommen. In diesem Fall muss
>> ich es ja erst abspeichern bzw. in einem externen Viewer öffnen .
>> Ich habe einen Teil des Mailheaders der Mail wie ich sie bekomme
>> (Mailclient Firefox) angehängt. Ein weitere Mailheader zeigt wie ich
>> es gerne hätte (hier wird das Bild bereits im Client dargestellt) - er
>> ist entstanden als ich mit phyton experimentiert habe. Ich will aber
>> eigentlich bei Perl bleiben !
>> Würde mich freuen, wenn mir da jemand weiter helfen könnte.
>>
>> Grüsse
>>
>>
>> Stefan Kristukat
>>
>>
>>
>>
>>
>>
>> sub schicken{
>> my $msg=0;
>> $msg = MIME::Lite->new(From => 'stefan.kristukat@hoc.net',
>> To => 'stefan.kristukat@hoc.net',
>> Subject => "Burki du $string2 send my sk\@lttwww",
>> Type => 'image/jpeg',
>> Path => './',
>> Filename => "$string2\_$title.jpg");
>>
>> $msg->send('smtp', 'mail.epfl.ch');
>> }
>>
>> ------------------------------------------------------------ ----------------
>>
>> Mailheader nach Versand mit Perl Mime::Lite
>> ------------------------------------------------------------ ----------------
>>
>>
>> MIME-version: 1.0
>> X-Mailer: MIME::Lite 3.01 (F2.72; T1.06; A1.58; B2.20; Q2.20)
>> Content-type: image/jpeg;name="Burki_2006_02_21.jpg"
>> Content-transfer-encoding: base64
>> Content-disposition: inline; filename="Burki_2006_02_21.jpg"
>> Delivered-to: stefan.kristukat@hoc.net
>> Original-recipient: rfc822xxxxxxxxxxxxxxxxxxxxxxxxxxx
>>
>>
>>
>> ------------------------------------------------------------ ----------------
>>
>> so will ich es haben; habe ich hinbekommen mit Python
>> ------------------------------------------------------------ ----------------
>>
>> .....
>>
>> MIME-version: 1.0
>> Content-type: multipart/mixed; boundary="/9DWx/yDrRhgMJTb"
>> Content-disposition: inline
>> Delivered-to: stefan.kristukat@hoc.net
>> User-Agent: Mutt/1.4.1i
>> Original-recipient: rfc822xxxxxxxxxxxxxxxxxxxxxxxxxxx
>>
>> --/9DWx/yDrRhgMJTb
>> Content-Type: text/plain; charset=us-ascii
>> Content-Disposition: inline
>>
>> send by sk@lttwww
>>
>> --/9DWx/yDrRhgMJTb
>> Content-Type: image/jpeg
>> Content-Disposition: attachment; filename="Burki_2006_02_21.jpg"
>> Content-Transfer-Encoding: base64
>>
>> /9j/4AAQSkZJRgABAgEASABIAAD/4ROWRXhpZgAATU0AKgAAAAgABwESAAMA AAABAAEAAAEa
>> AAUAAAABAAAAYgEbAAUAAAABAAAAagEoAAMAAAABAAIAAAExAAIAAAAUAAAA cgEyAAIAAAAU
>> .....

Re: MIME:Lite

am 21.02.2006 12:02:23 von ReneeB

Vielleicht kannst Du was mit Mail::Sender anfangen... Damit hatte ich
noch nie Probleme, Attachments zu verschicken...
(http://wiki.perl-community.de/bin/view/Wissensbasis/MailSen der)

Re: MIME:Lite

am 21.02.2006 14:13:55 von Stefan Kristukat

Hallo ReneeB

guck mal hier der Code, es gibt keine Fehlermeldung beim Asuführen, aber
es kommt nichts an. Im Anschluss folgt der Mailheader. Da steht drinnen,
dass c
Hast Du ne Idee, was ich da falsch mache?



sub schicken1{
my $file='/lhome/wwwuser/bin/tmp.jpg';
my $form = '

Test

HTML-Mails sind toll
';
my $sender = new Mail::Sender {
smtp => 'hoc.net',
from => 'stefan.kristukat@hoc.net',
# auth => 'LOGIN',
# authid => 'username',
# authpwd => 'passwort',
on_errors => undef,
} or die "Can't create the Mail::Sender object:
$Mail::Sender::Error\n";

$sender->OpenMultipart({to => 'stefan.kristukat@hoc.net',
subject => "HTML test ",
ctype => "text/html; charset=iso-8859-1",
encoding => "quoted-printable"}) or die
$Mail::Sender::Error,"\n";
$sender->SendEnc($form);
$sender->Attach($file);
$sender->Close();
}
------------------------------------------------------------ ------------------
To: stefan.kristukat@hoc.net
Message-id: <20060221_130338_045579.stefan.kristukat@epfl.ch>
MIME-version: 1.0
X-Mailer: Perl script "schicken3.pl" using Mail::Sender 0.8.10 by Jenda
Krynicky, Czechlands running on xxx (xxx.xxx.xxx.xxx) under account
"htcalc"
Content-type: multipart/mixed;
boundary=Message-Boundary-by-Mail-Sender-1140527018
Delivered-to: stefan.kristukat@hoc.net
Original-recipient: rfc822;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

--Message-Boundary-by-Mail-Sender-1140527018

Test

HTML-Mails sind toll

------------------------------------------------------------ -----------------


ReneeB wrote:
> Vielleicht kannst Du was mit Mail::Sender anfangen... Damit hatte ich
> noch nie Probleme, Attachments zu verschicken...
> (http://wiki.perl-community.de/bin/view/Wissensbasis/MailSen der)
>

Re: MIME:Lite

am 21.02.2006 17:38:12 von Otto Lang

Stefan Kristukat wrote:
> Hier die aktuelle Version der Funtkion, in der ich auch den komischen
> Filenamen entfernt habe.
>
> sub schicken2{
> my $msg=0;
> $msg = MIME::Lite->new(From => 'stefan.kristukat@hoc.net',
> To => 'stefan.kristukat@hoc.net',
> Subject => " test",
> Type => 'image/jpeg',
> Path => './',
^^^^^^^^^^^^^^^^^^^^
ich nehme an, dass hier der Fehler liegt. Meines Wissens
gehört hier der komplette Pfad inklusive Dateinamen rein:

Path => "/ganzer/pfad/zum/bild.jpg"

HTH
../otto