Wolfram Mathematica, 7571 75 bytes
{"Hare"Krishna ","Krishna"Hare ","Rama ","\n"}[[#]]&/@IntegerDigits[5581610027956[[IntegerDigits[73825885093,5]<>""4]+1]]<>""
Every part of result was encoded as an index in a list, and every index was encoded as digit of 54-ary integer.