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


in reply to Help needed with file output and hashes.

It is always nice to handle exceptions properly in your code. Modify your code a little bit:

if (defined($functionName)) { my $desc = <DATA>; # pull the next line $functxt{$functionName} = $desc; } else { print STDERR "bad data: and attach some useful info for yo +ur debug purpose, such like the original data\n"; }