Hi All Sorry to disturb you again but the same program is creating a heap of troubles this time it is not showing any results at all, it takes an input and then forgets to process, the program is here
*use warnings;
use strict;*
*print "Plz enter the path name:";
my $DIR=<STDIN>;
chomp($DIR);
if($DIR=~/([a-z]+)/)
{
print $1 if defined;
print $2 if defined;
print $3 if defined;
}*
what i want is to print is all the directory names in a given path.
--
Thankx & Regards
Roopak Kr Prajapat
