请教问题!!(急)

jackiechan

UID: 27756
帖子: 52
积分: 119
在线时间: 3 小时

1^# jackiechan 发表于 2008-10-26 20:16

请教问题!!(急)

请教问题!!(急)
我想实现将读出的文件名放在一个数组里,想请教一下,将目录名放入到数组中想用一个子程序实现.
&dirs的子和序该如何实现,而且我还想在下面的代码里引用这个数组的,请教高手帮忙!!

...
if (my $file->{$name}->{TYPE} eq 'd'){
#如果文件是目录,就将目录名放入到数组中.
my @dirs= &dirs($ftpfiles->{$name}->{NAME});

}

jackiechan

UID: 27756
帖子: 52
积分: 119
在线时间: 3 小时

2^# jackiechan 发表于 2008-10-26 20:34

我在线等啊,有哪位高手帮帮忙啦,我现在急着要用.谢谢!

chenchen

UID: 45214
帖子: 79
积分: 181
在线时间: 8 小时

3^# chenchen 发表于 2008-10-27 21:57

不需要用子程序吧.直接用p.
不需要用子程序吧.直接用push(@dirs, $file->...)