$a =~ /\p{IsC}/

##</code><code>##

$a !~ /\p{IsPrint}/

##</code><code>##

$a !~ /\p{IsASCII}/