Revision 9b024564
Von Moritz Bunkus vor etwa 8 Jahren hinzugefügt
| SL/Mailer.pm | ||
|---|---|---|
|
sub new {
|
||
|
my ($type, %params) = @_;
|
||
|
my $self = { %params };
|
||
|
$parser = new MIME::Parser;
|
||
|
$parser = MIME::Parser->new;
|
||
|
$parser->output_under("users");
|
||
|
|
||
|
bless $self, $type;
|
||
Auch abrufbar als: Unified diff
Testfehler: keine indirekte Objektnotation nutzen