thanks you so much for your input and quick response
Here I go through a loop of files and after reading files into $data I find and replace them using the write_file
$data =~ s/$_->{toFind}/$_->{toReplace}/g foreach (@myHashArray); write_file($File::Find::name, $data); print LOGFILE "$counter $File::Find::name\n"; print LOGFILE "\t Original line: HERE WOULD BE MY ORIGINAL + LINE\n"; print LOGFILE "\t Replaced Line: HERE WOULD BE THE NEW LIN +E\n"; print "$counter $File::Find::name\n";
In reply to Re^2: array of hashes help
by rv799cv
in thread array of hashes help
by rv799cv
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |