c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my $s = qq{xxx\x0cyy\x0czzz};
 dd $s;
 ;;
 $s =~ s{ \Q@{[ chr 12 ]}\E }{}xmsg;
 dd $s;
"
"xxx\fyy\fzzz"

"xxxyyzzz"