如何在 ftp 上列出本地目录的内容？

Question

我正在尝试通过 Perl 脚本将文件发送到远程主机。为此，我想列出本地目录，然后在使用以下命令遍历文件列表时选择要上传的文件：

my @files = '!ls'; does not work
my @files = 'lls'; does not work either

那我想做：

foreach my $file (@files) {
next if -d $file;
next unless $file =~ /^gateway_data/;
$ftp->put($file) or warn "Failed '$file': $! ($^E)";
}

除了上述两个之外，还有其他命令可以创建本地目录中的文件列表吗？ 我们将不胜感激。

Answer 1

opendir(my $DIR, './') or die $!;
my @files = readdir($DIR);
foreach my $file (@files) {
    next if -d $file;
    next unless $file =~ /^gateway_data/;
    $ftp->put($file) or warn "Failed '$file': $! ($^E)";
}

这应该可行。