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: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |