Opening a Directory

[guy128]

How can I make a perl program that will open a folder on my computer?

Thanks.

[KevinADC]

opendir(DIR,'foldername') or die "$!";
do something here
close(DIR);

[savanm]

Hi....

use Cwd();
$path=getcwd();//Get the current path
$path=~s/\\/\//sg;
opendir(DIR,$path) || die ("cannot open the path");//This will used to open the folder
//in a particular path

Do sumthing
close(DIR);

[savanm]

Hi....

use Cwd();
$path=getcwd();//Get the current path
$path=~s/\\/\//sg;
opendir(DIR,$path) || die ("cannot open the path");//This will used to open the folder
//in a particular path

@content=grep(/\.xml/,readdir(DIR));//This will used to retrieve the particular Extension of the file

close(DIR);