q = 0 #=;sub randint{$A=(pop,pop)[int rand 2]};@ A = ('Perl', 'Python', q) #));sub A{$_}; import whrandom; s = tr = 0 #= ;$ _ = "Perlon'"; y = 'really' #=" tychoon= if(rand 2)%2; m = x =s | tr / 2197 #no'/ Perl comment \b / if !/y/; print A[whrandom.randint(0,1)], if x == whrandom.randint(0,1)+q: #:; tr = 1 ; qq = '' # =;if((rand 2)%2){ print y,"sucks",qq #,||"sucks"}else{ eval q>>.q# else: #,; print "rules"; q = 1 #=}print"\n"