如何在Linux中获取给定路径上的所有文件夹？

Question

目录结构

Attachments/TADDE12345
Attachments/TADDE12346
Attachments/TADDE12347
Attachments/TADDE12348
Attachments/TADDE12349
Attachments/TADDE12350

我必须在附件目录中获取所有文件夹名称，而不使用任何cpan模块？

Answer 1

请参阅glob：

  

在列表上下文中，返回一个（可能为空）文件名列表   扩展EXPR的值，例如标准的Unix shell   / bin / csh会这样做。在标量上下文中，glob遍历这些   文件名扩展，当列表用完时返回undef。

Answer 2

如果您只需要来自给定路径的目录：

#!/usr/bin/perl                                                                               
use strict;
use warnings;              

my $dirpath = "/Attachments";

opendir(DIR, $dirpath);

while (my $entry = readdir DIR) {
    next if ($entry eq "." or $entry eq "..");
    $entry = $dirpath . $entry;
    print "$entry\n" if (-d $entry);
}

closedir DIR;