Perl MIME::LITE with UTF8

Reference: http://www.databasesandlife.com/using-utf-8-and-unicode-data-with-perl-mimelite/

use MIME::Lite;
MIME::Lite->send('smtp', $mail_host, Debug=>0, Timeout=>60);

$msg = MIME::Lite->new(
From     => $mail_from,
To       => $mail_to,
Bcc       => $mail_bcc,
Subject  => $mail_subject,
Type     =>'text/html; charset=UTF-8',
Data     => $mail_body
);
$msg->send();