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