foreach $path ( keys %db_hash ) { print "List for $path...\n"; foreach $index ( keys %{ $db_hash{$path} } ) { print "END: ", $db_hash{$path}{$index}{END}, "\n"; } } #### Use of uninitialized value in print at ./utk.pl line 66, line 24699. Use of uninitialized value in print at ./utk.pl line 66, line 24699. #### $db_hash{$path}{$index}{END} #### $db_hash{$path}{'index'}{END}