As a hint -- look up the index function and take a look at the chapter on 'Regular Expressions' in the Camel (Programming Perl). Write back when you have some more code for us to look at.