*ARGV=[3,-3,-5,10,-2,0,7,-6,10,2,4,1,0,2,5];$;=eval(q);$,=qq/\145\162/));@;
=split'',achJklmnostuq=>$=-46;;$/=qq:$;[pop] $;[pop]$;[pop]$;[pop]$;[pop]$;
:;*^W=$[;*==q===>$.=$"=>map{$=.=$;[$_]}@ARGV;$==~s=q= ==>print $==>' P',$/;