$line =~ s/A.TL5F00/+TL\\F5C/g;