ajit
New User
May 21, 2007, 5:40 AM
Post #1 of 1
(1413 views)
|
|
Perl recursive.pm help
|
Can't Post
|
|
Hi,
Can any one help me with using the recursive.pm package/module. I am using dir.pm module also, i am getting the following error at this line in dir.pm
my $dh = IO::Dir::Recursive->new('C:\Perl\Scripts\Testing_directory\New Folder');
print "$_\n" while $dh->read(); nothing is read here, so nothing is printed.
tie my %dir, 'IO::Dir::Recursive', 'C:\Perl\Scripts\Testing_directory\New Folder';
print $dir{subdir1}->{subdir2}->{file}->slurp(); error occurs on execution of this line which points to the following line in dir.pm. my($atime,$mtime) = ref($data)? @$data : ($data,$data);
Can any one tell me how does the above four lines actually work. I am able to get the directory structure into %dir but can slurp() the files.
Thanks.
|
MAIN
SEARCH
WHO'S 
LOG 