my $ff = chr(12);
s/\Q$ff\E//g;