What about this?
#!/usr/bin/perl -w print pack"B*", $_ for qw( 01001010 01110101 01110011 01110100 00100000 01100001 01101110 01101111 01110100 01101000 01100101 01110010 00100000 01010000 01100101 01110010 01101100 00100000 01001000 01100001 01100011 01101011 01100101 01110010 );
Perhaps you should have a look at this node ...
In reply to Re: My First JAPH
by cchampion
in thread My First JAPH
by Spidy
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |