Re^5: Breaking the indecipherable cipher, courtesy Charles Babbage.

automation is right ;) ...

i did the same as you did, but i've obtained the correct result ...

turo@somewhere:~# tail -12 vigenere.pl | perl -pe 's/\W|\s//gm'   | pe
+rl vigenere.pl - | perl babbage.pl
Key: vigenerepl
Plaintext:
thevigenerecipherknownbysomeaslechiffreindechiffrable ...
[download]

The more bizarre thing, is that if i rename the file to chargrill and do the same, the result is wrong

turo@somewhere:~# tail -12 chargrill | perl -pe 's/\W|\s//gm'   | perl
+ chargrill - | perl babbage.pl
Key: a
Plaintext:
voemoxmyptlczvymcvpvwehpazxghscktptqhyeztumnskmfigstpqtl ...
[download]

Maybe the solution is to choose a keylengh (and key), get the result for the bests fits, and pass some test to see if the result is right or not (based on letter frequencies) ... or something like that

turo

PS: only one more question, which book did you bought? (I've got the David Khan's Codebreakers; but is too big) ... Is the Sinmon Singh's one? ... woff, woff

perl -Te 'print map { chr((ord)-((10,20,2,7)[$i++])) } split //,"turo"'

Comment on Re^5: Breaking the indecipherable cipher, courtesy Charles Babbage. Select or Download Code


P is for Practical
	PerlMonks