sub :::::: {$x=sub {$z={};$b="$N{";$_="$x$y$z$w\n";};
$y=[a..z,$w=\$z,[0..9,2..3]]}Izwq(Qo}fi|z0Xdad(Xr`jis
&$x;s/(?<=\(.)(.*?\))//g;$c=length($b);$_=($b&"\340"x
$c)|(($_^$b)&"\037"x$c);$_.="\n";} &::::::;print;