在Perl语言编程一书中学习到了一种直接读取特定格式文件的方法，非常简洁，代码如下：

while (<*.pl>){
	print $_." ";
}

本文出自 “如意灵临” 博客，请务必保留此出处http://417722381.blog.51cto.com/7856838/1886580

Perl 读取特定格式的文件名