#!/usr/bin/perl -w use strict ; @$ = qw ( 372 266 262 264 416 290 316 318 264 304 298 260 416 320 298 260 312 416 304 290 294 310 298 260 + 440 500 ) ; for ( + @$ ) { print chr ( + ( ( $_ >> + 1 ) ^ 240 ) ) }
In reply to More bitJAPHing by NearO
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |