Perl 中glob不起作用,系统为XP, Perl 版本为active per 5.16

我写了一段代码打印文件家中所有TXT文件的文件名,程序如下:
my @txt_files=glob("*.txt");
print "@txt_flies\n";

可是在命令行中运行的时候是没有任何显示的

应该打印出每个文件名才对呀,怎么会没有显示呢,我刚开始看PERL没多久
,麻烦高手给看看这个是怎么回事,谢谢大家

@txt_files
@txt_flies

你这前后写的变量名都不一样呀。

建议你写代码加上:
use strict;
use warnings;

my @txt_files=glob("*.txt");

print "@txt_flies\n";