my $host = lc(shift(@_));