http://www.perlmonks.org?node_id=621171


in reply to Tracking down an uninitialized value warning

Hi,
Change the condition. It may works, please check

if (exists $tref->{$host}{$test})