The directory listing : readdir « File « Perl






  1. Perl
  2. File
  3. readdir

The directory listing

    

#! /usr/local/bin/perl
use Cwd;
$dir = cwd;
print "dir=> $dir\n";

opendir(THISDIR, "$dir");
@dirList = <THISDIR>;
print "OPEN @dirList\n";

@dirList = readdir THISDIR;
print "READ @dirList\n";
print "\n\nThe directory listing after using readdir\n";
foreach $dir (@dirList){
   print "$dir\n";
}








Related examples in the same category

1.Using readdir to get the content in a folder
2.List the files and subdirectories in a directory.
3.Read a directory entry
4.To read a directory entry (usually a file name), use the readdir function