minimal sig line japh:

foreach(reverse("erckhal er perthno astJu"=~/(..)/g)){print(split //)}

VGhpcyBtZXNzYWdlIGludGVudGlvbmFsbHkgcG9pbnRsZXNz