foreach my $line ( grep { $_ =~ /<META NAME="AA\./ } <FILEHANDLE> ) {
    $line =~ s/"AA\.(.+?)"/"$1"/;
}