http://www.perlmonks.org?node_id=637892


in reply to Re: Recurring Cycle of Fractions (tiny)
in thread Recurring Cycle of Fractions

Same as mine but much shorter! ++!

s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{%
+.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e