[EMAIL PROTECTED] wrote:
> How do I get a list of directories within a directory into an array ?
Untested:
opendir DIR, $dir or die "opendir $dir: $!";
my @dirs = grep { -d && ! /^\.{1,2}$/ } readdir DIR;
closedir DIR;
> Can I remove directories containing files in perl ?
use File::Path;
rmtree $dir;
--
,-/- __ _ _ $Bill Luebkert ICQ=162126130
(_/ / ) // // DBE Collectibles Mailto:[EMAIL PROTECTED]
/ ) /--< o // // http://dbecoll.tripod.com/ (Free site for Perl)
-/-' /___/_<_</_</_ Castle of Medieval Myth & Magic http://www.todbe.com/
_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
