I use MIME::Lite, don't know "$c->email"...
A concrete example, from a real salary application (salar.sitsco.com - in
short time
I provide a new, many featured, version):
sub send_fisa : Local {
my ( $self, $c, $ia ) = @_;
my $st = salar::Model::State->retrieve($ia);
my $emal = $st->id_angajat->email;
my $from = $st->id_scoala->email;
my $subj = 'fişă salariu';
$st->subrute;
$c->stash->{angaj} = $st;
$c->stash->{sendto} = 1;
my $out = $c->view('TT')->render($c, 'fisa_stang.html');
my $msg = new MIME::Lite(
From => $from,
To => $emal,
Subject => $subj,
Type => 'TEXT',
Data => $out
);
$msg->attr("Content-type" => "text/html;charset=utf-8");
$msg->send;
# $c->res->redirect('/');
return $c->res->body("<script>hideLev('hsind');</script>");
}
--vb
On 1/6/07, Octavian Rasnita <[EMAIL PROTECTED]> wrote:
Hi,
Does anyone have an example of sending a UTF-8 encoded email message using
$c->email?
Thank you.
Octavian
_______________________________________________
List: [email protected]
Listinfo: http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive:
http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/
_______________________________________________
List: [email protected]
Listinfo: http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/
