How To Read a List of subdirectories in a Directory

[imfanee]

Hi ALL,

I want to read list of all subdirectories in an array in perl. I know how to get a list of all files in a directory but it does not show subdirectories in that list.

Can any help out on this issue.
Thanks in advanced.


Fanee G.

[numberwhun]

Hi ALL,

I want to read list of all subdirectories in an array in perl. I know how to get a list of all files in a directory but it does not show subdirectories in that list.

Can any help out on this issue.
Thanks in advanced.


Fanee G.

You will want to take a look at the File::Util module on CPAN. There is a function for "list-dir" that has an option to it to only list directories in a directory.

Regards,

Jeff

[KevinADC]

Hi ALL,

I want to read list of all subdirectories in an array in perl. I know how to get a list of all files in a directory but it does not show subdirectories in that list.

Can any help out on this issue.
Thanks in advanced.


Fanee G.

post the code you are using.

[imfanee]

This is the code I am using.

I have also tried File-Util. But this is not available for windows when searching by ppm.

I tried to compile it using nmake but their are lot of errors.

This is the code i am using to find file list.

@files = <*>;
foreach $file (@files)
{
$counter = $counter += 1;
print $counter." = ".$file . "\n";
}
.

[imfanee]

You will want to take a look at the File::Util module on CPAN. There is a function for "list-dir" that has an option to it to only list directories in a directory.

Regards,

Jeff

I have tried but this module is not available by windows when search by ppm.

I tried to compile it using nmake but it says lot of errors and stop.

[KevinADC]

This is the code I am using.

I have also tried File-Util. But this is not available for windows when searching by ppm.

I tried to compile it using nmake but their are lot of errors.

That looks like it should give you a list of all files and folders in the current directory.

[numberwhun]

This is the code I am using.

I have also tried File-Util. But this is not available for windows when searching by ppm.

I tried to compile it using nmake but their are lot of errors.

I hate to break it to you, but I am also using Active State on Windows and File-Util IS on there and it is available. It may be that it is already installed by default, you need to check.

Regards,

Jeff

[KevinADC]

File::Util does not comes as a standard activestate perl module. You must have installed it.

[numberwhun]

File::Util does not comes as a standard activestate perl module. You must have installed it.

I agree (after looking at a new installation on another machine), but, the fact does remain that it is definitely part of the PPM repository on Active State and is called "File-Util".

[KevinADC]

I don't see it listed on activestate in the perl module list.

The list goes:

File-Touch
Fle-VirtualPath


which skips any File-U* modules.