$$ = q{$_=unpack'u',q|L)%\]<2$D7STG<')I;G0@(DIU<W0@86YO=&AE<B!097)L(&AA8VME<B(G(3L`|;};
$b = q{$_=unpack'u',q|<)%\])R1?/7$A*"1?*3TH)"0]?B\N*B]G*2$G.P``|;};
#$$ =~ s/\n//g;
$a = '$_=$b';
$_ = '$_=$a';
#$} =~ s/\n//g;

eval; eval; eval; eval; eval; eval; eval; eval; eval; eval;