print "From outside the subroutine:\n"; my $i = 0; while ( $i < @names ) { print "$myHash{ $names[$i] }{ name }\n"; $i++; } #### Use of uninitialized value in concatenation (.) or string at hashOfHashes.pl line 22, line 5.