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