$y^=($x^=$x<<23)^$x>>17^($x=$y)>>26,print~~do{BEGIN{$=1}$x+$y},$/for(($x,$y)=glob<>)x50