Problem in a perl script

Hi All

I have to modify a existing perl script

The context of the input txt file has changed 

Basically I have to remove 4 lines from the top of the file and print a number
Of fields into another file and feed the out put back into the script. Now I�m doing this part manually
Using

gawk -F"," '{print $1"-"$2,",",$3,",",$11 >> "new.file"}' file2

is there a perl equivalent to this gwak and I have to use gwak because some of
the records are to long

thankyou

---------- Post updated at 12:04 PM ---------- Previous update was at 10:56 AM ----------

Thank you all. Found the solution to my problem
It was simple after all.

Dan

Please post your solution... that would be very nice!