1 2 3
($;,$_,$|,$\)=("Yoo*se\x7F*cd*Mcpk+"," "x17,1,"\r"); {vec($_=>1+$"=>$^F<<$^F)=ord($/^substr$;=>$"=int rand 16=>1); print&&select$,,$,,$,,$|/($|+tr/ //c);redo if y/ //>$^F**2};
1 2
! Disallowed system call: SYS__newselect