$a=hex(0xB)-16;@b=qw(Tif tmffqfs ibt
bxplfo);$c="Vikixe";$c=~y/e-za-d/a-z/;
print"\"";foreach(@b){s/$/ /;y/b-z/a-z/
;if($a==@b){s/ $//;}print;$a++;}print(
pack("c1",oct(ord(")")))."\"\n\n\t--$c");
[download]