Moin!
Hab ein Problem mit libmail-imapclient-perl. Wenn ich folgendes Script
aufrufe, dann verbraucht das Script den kompletten Speicher. Das Problem
ist dabei die Funktion $imap->body_string(). message_string()
funktioniert ohne Probleme. K�nnte das mal bitte jemand testen?
-------------- snip ---------------
#!/usr/bin/perl -w
use Mail::IMAPClient;
use Digest::MD5 qw(md5_hex);
use strict;
my $host = "localhost";
my $user = "bla";
my $pass = "foo";
my $imap = Mail::IMAPClient->new( Server => $host,
User => $user,
Password => $pass,
Peek => 1,
Uid =>1
) or die "Cannot connect to $host as
$user: $@";
my @headerlist = ("From","To","Cc","Date","Message-Id");
$imap->select('INBOX');
my @mails = $imap->search("ALL");
foreach my $m (@mails){
print $imap->body_string($m);
}
-------------- snip ---------------
Oder ist da ein Fehler drin?
Vielen Dank,
Christian
--
Haeufig gestellte Fragen und Antworten (FAQ):
http://www.de.debian.org/debian-user-german-FAQ/
Zum AUSTRAGEN schicken Sie eine Mail an [EMAIL PROTECTED]
mit dem Subject "unsubscribe". Probleme? Mail an [EMAIL PROTECTED] (engl)
