Sending HTML Mail using Mutt utility - Perl Syntax

my $current_date = `date +"%d-%b %H:%M"`;
chomp($current_date);

system("/usr/bin/mutt -e 'set content_type=text/html from=FromAddress\@domain.com realname=\"System Team\"' -s \"Report from $hstname at $current_date\" ToAddress\@domain.com -a FileName -c user1\@domain.com,user2\@domain.com < InputFile")