Don't worry about how to do it in Perl. Ask yourself "If I was doing this by hand, how would I accomplish the task?".

Once you see the logic laid out, you'll be able to write the equivalent code.