perl处理文本能力之强大，运用正则表达式更是如虎添翼。