in reply to Recurse through directories for file I/O
Still not getting it?
But as you have perl-files, you probably wanna do some do's. (do $conf)for my $dir (glob </web/web1/*>){ next unless -e my $conf = $dir.'/config.pl'; open DATA, $conf || die "Could not open $conf"; my @data = <DATA>; #and do something with it close DATA; }
Jeroen
"We are not alone"(FZ)
|
|---|