my $badstuff = read_file( $file,  { binmode => ':raw' } );
$string =~  s/\Q$badstuff\E//;