$U = unpack('C', $1); $U < 127 and $U > 31 or return;