$ perl -MO=Deparse,-p -e " my $                     host_mail = qq[80.80.80.80];  "
(my $host_mail = '80.80.80.80');
-e syntax OK