See perldata. I would approach the task generally, so the program would work for any input, not only the sentences you mentioned. Therefore, if I gave you the example, I would solve your problem, which contradicts what Corion wrote :-)