use Data::Dumper;
my %hash;
my $hostname = "test";
if (defined $hash{ $hostname }) {
}
print Dumper \%hash;
__END__
$VAR1 = {};