no strict qw(refs);
my $variable = 'host_mail';
my ${ $variable } = '80.80.80.80';