Perl之读取文本文件,按照给定的关键字读取文件内容并输出。