Back to the drawing board, and out again.

What have we here? Yet another completely useless bit of code!

while("Ox74Ox65Ox80Ox72"=~/(..)/g){print(pack(c,$1))if($c?0:1)}

Spacewarp

DISCLAIMER:
Use of this advanced computing technology does not imply an endorsement
of Western industrial civilization.