You can also do it during the while loop. This is also handy if you need to remove the \n character.

while (<ORGDB>) {  
  chomp;
  next if /^company/;
}
[download]

Change the ^company to whatever you can get away with. ie: if company appears at the front of the line (the word company) then you can change it to be "company name" or whatever is unique in the top line of your file.

'Fect