well, I can lend a hand on your regex:
foreach my $line ( grep { $_ =~ /<META NAME="AA\./ } <FILEHANDLE> ) { $line =~ s/"AA\.(.+?)"/"$1"/; }
the grep filters the input from the file so you only have to deal with the lines that have the meta tags in question. Then you don't need to escape quotes and equal in the regex, rendering your regex much more legible. Reading in directly from the filehandle will also use up less memory at any given point since you don't have to read in the whole file.
note that this general technique of going line by line will only work for you if the meta tag isn't split up across multiple lines
In reply to Re: changing data
by AidanLee
in thread changing data
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |