Just shift it off after you read it in.

 
open (ORGDB,"<$database");
@ODB=<ORGDB>;
close (ORGDB);

shift @ODB;

#This should sort the lines by company alpha-order 
@ODB = sort(@ODB);
[download]

UPDATE: You can also find this answer using search. I found 2 right off the bat.

Deleting the first line of a file

Help removing first line from retrieved text file.
search is your friend

grep

grep> cd pub grep> more beer

Comment on Re: Flat Database: Skip the first line Download Code