Re: Porting Perl 5.6 to Perl 5.8 need \P{print}

>     $errmsgbase =~ tr/[\200-\377]/./; # Kill UFT-8 Problem Characters>     $errmsgbase =~ s/\P{print}/./g;   # Doctor Unprintable Characters

Okay, answering my own question here . . . this seems to work:

$errmsgbase =~ s/\P{IsPrint}/./g;   # Doctor Unprintable Characters

Oddly, my reading of Perl Programming says this should also work, but 
it does not:

$errmsgbase =~ s/\P{IsC}/./g;   # Doctor Unprintable Characters

Frank