sub sanitize { $_[0] =~ s/[^\x00-\xFF]//gr }

##</code><code>##

sub sanitize { decode( "cp1252", encode( "cp1252", sub{ "" } ) ) }