Sounds like homework to me. If it's not I apologize. What have you tried? take a look at perlre or substring (<edit> duh.. substring rofl..you can emulate pop via a substitution which I had done recently and that was sticking in my head)</edit> if you haven't already.