“Perl List -Dateien und Ordner in einem Verzeichnis” Code-Antworten

Perl List -Dateien und Ordner in einem Verzeichnis

opendir my $dir, "/some/path" or die "Cannot open directory: $!";
my @files = readdir $dir;
closedir $dir;
Vternal3

Perl List -Dateien und Ordner in einem Verzeichnis

my $dir = "bla/bla/upload";
opendir DIR,$dir;
my @dir = readdir(DIR);
close DIR;
foreach(@dir){
    if (-f $dir . "/" . $_ ){
        print $_,"   : file\n";
    }elsif(-d $dir . "/" . $_){
        print $_,"   : folder\n";
    }else{
        print $_,"   : other\n";
    }
}
Vternal3

Perl List -Dateien und Ordner in einem Verzeichnis

use File::Find;

my @content;
find( \&wanted, '/some/path');
do_something_with( @content );

exit;

sub wanted {
  push @content, $File::Find::name;
  return;
}
Vternal3

Ähnliche Antworten wie “Perl List -Dateien und Ordner in einem Verzeichnis”

Fragen ähnlich wie “Perl List -Dateien und Ordner in einem Verzeichnis”

Weitere verwandte Antworten zu “Perl List -Dateien und Ordner in einem Verzeichnis” auf Perl

Durchsuchen Sie beliebte Code-Antworten nach Sprache

Durchsuchen Sie andere Codesprachen