Jemand kümmert sich um dies in verschleierte Perl übersetzen? Es ist in Python geschrieben entnommen aus: hereSudoku verschleiert Python -> Perl Übersetzung
def r(a):i=a.find('0');~i or exit(a);[m
in[(i-j)%9*(i/9^j/9)*(i/27^j/27|i%9/3^j%9/3)or a[j]for
j in range(81)]or r(a[:i]+m+a[i+1:])for m in'%d'%5**18]
from sys import*;r(argv[1])
Ich weiß, es ist nur so zum Spaß :)
Sieht für mich ziemlich verschleiert aus! –
ofuscated Code ist verschwendeter Code. Es ist nur zum Spaß und nicht wert, in eine andere Sprache zu übersetzen. –
"Obfuscated Perl" ist überflüssig! –