in reply to Testing for unprintable characters

How 'bout 
/[^[:print:]]/;

[download]
? (perlre)

In Section Seekers of Perl Wisdom