(while(print(regexp-replace"(.)(.*)(.)"(read-line)"\\3\\2\\1")))