push @NewSym, $line if $line =~ s/^A.TL5E00/+TL\E5C/g;