Add charset to sended log email
This commit is contained in:
parent
a4076fe953
commit
33e32d2916
@ -4,6 +4,10 @@ use v5.10.1;
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use Carp;
|
use Carp;
|
||||||
|
use utf8;
|
||||||
|
use open IO => ':utf8';
|
||||||
|
use open ':std';
|
||||||
|
|
||||||
use Data::Dumper;
|
use Data::Dumper;
|
||||||
use Email::MIME;
|
use Email::MIME;
|
||||||
use Exporter 'import';
|
use Exporter 'import';
|
||||||
@ -74,6 +78,11 @@ sub log
|
|||||||
To => "Roots assistants <ml-root\@acu.epita.fr>",
|
To => "Roots assistants <ml-root\@acu.epita.fr>",
|
||||||
Subject => "[LERDORF][ERROR] ".join(' ', @_)
|
Subject => "[LERDORF][ERROR] ".join(' ', @_)
|
||||||
],
|
],
|
||||||
|
attributes => {
|
||||||
|
encoding => 'quoted-printable',
|
||||||
|
charset => 'utf-8',
|
||||||
|
format => 'flowed',
|
||||||
|
},
|
||||||
body_str => "Bonjour,
|
body_str => "Bonjour,
|
||||||
|
|
||||||
Une erreur de niveau $level est survenue sur la machine $HOSTNAME.
|
Une erreur de niveau $level est survenue sur la machine $HOSTNAME.
|
||||||
|
Reference in New Issue
Block a user