One line at a time, except sometimes. What have you tried and where are you having trouble?

Perl inherits a lot of syntax from C so a lot of stuff translates fairly easily.

Update: please indicate any substantive edits to your node using an update (like this one). Inserting '(automated)' substantially alters your question. Replying to one of the replies you received would have been better in this case.