Template Toolkit и Mail::Sender

[djkostya]

Имеем Template Toolkit и Mail::Sender

Так вот встала проблема как прикрепить шаблон к Mail::Sender

То есть должен шаблон в итоге отправиться по E-Mail

$sender->Open({ to => "$email", subject => "TEST SUBJ" });
$sender->SendLineEnc("здесь должен быть шаблон");
$sender->Close();



Уже с ма схожу.................
как сделать помогите

[djkostya]

sub text{
my $template = Template->new({  INCLUDE_PATH=>"/путь/template"  });
$template->process("email.tmpl");
}


$sender->Open({ to => "$email", subject => "1111111111" });
$sender->SendLineEnc(\\&text);
$sender->Close();


Что-то не получаеться

[2NetFly]

sub text{
    my $content;
    my $template = Template->new({ INCLUDE_PATH=>"/путь/template" });
    $template->process("email.tmpl", {}, \\$content);
    return $content;
}

[djkostya]

не пашет приходит что то вроде этого CODE(0x8598a30)

[2NetFly]

Сделай Dumper($content) и посмотри, что там.

perldoc Template:
    # reference to output text string
    my $output = \'\';
    $tt->process(\'welcome.tt2\', $vars, \\$output)
        || die $tt->error(), "\\n";


    print "output: $output\\n";

[djkostya]

Спасибо получилось