open STUFF, "<", $file or die "Can't open $file: $!"; while () { chomp; $seen{internal_name}++, next if /^internal name/; if ($seen{internal_name}) { if (/^need this/) { # do your stuff here } } }