Perl 讀取特定格式的文件名

在Perl語言編程一書中學習到了一種直接讀取特定格式文件的方法，非常簡潔，代碼如下：

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