$_=unpack"b*",'M\xcbNs\xd3\xb2\xd3\xc42\xb24\xb1\x8c\xdc\xb4\xec47-;\xb1\x8c,M,#\xcbM\xcbNs\xd3\xb2\x13\xcb\xc8\xd2\xc42\xd2\xc4\xb2\xd3\xdc\xb4\xec47\xb24\xb1\x8c,M\xec47-;\xcdM#K\x13\xcb\xc8\xd2\xc4Ns\xd3\xb2\xd3\xdc\xb2\xd3\xc42\xb24\xb1\x8c\xdc\xb4\xec47-;\xb1\x8c,M,#\xcbM\xcbNs\xd3\xb2\x13\xcb\xc8\xd2\xc42\xd2\xc4\xb2\xd3\xdc\xb4\xec47\xb24\xb1\x8c,M\xec4';y/0/2/;print
Note that non-ascii characters in the above source code will be escaped (such as \x9f).