sickboy, this has the feel of a homework assignment... But whether or not that is the case, you will receive much better help if you take a stab at the problem yourself.

For starters, without worrying about producing any Perl code, how would you break this task down into several smaller tasks. Just state the sub-tasks in plain English.

Once you have this outline, take a shot at the first task and show us your work and describe what happened or where you are stuck and why.

Working in steps this way, you will receive generous help. Ask us to solve your problem for you and the responses will be a bit less patient.