ROT13 Revisited
Ok so here I sit at home toying with some perl and I decide to revisit my reverse ROT13 quest. I made a quick perl script to go through a dictionary file I have and find any word that fits what I was looking for. I have found several :). (I only counted words that were 4 characters long or longer)
- gnat
- grivet
- ravine
- rive
- robe
- surf
- tang
- thug
Sourcecode here. Usage: cat dictionaryfile | findrevrot13.pl
You will need a dictionary file (and by dictionary file I mean a list of words, each word on its line). This will print out any word in the word list that can be rot13-ed and then reversed and it come back as the original word. (yes I know that it is about 5 seconds worth of perl, I still enjoyed writing it to answer this puzzle)