Help for this page

Select Code to Download

Select or download this
```
$a="1 1";
$b="1 1";
*(=*a;
*)=*b;
```

Select or download this

eval substr($~,substr($),$[,++$.),substr($(,$^F,$.));
sub T {
...
substr$_,$[,$.),$=,$=))/10)}/([^\.]+)./g;unshift@;,97;
print chr for@;;print$";$_ = '227065726C206861636B6572242F22';
print eval pack('c15',map{hex}/(..)/g);}