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


in reply to Why the print is not working

In addition:

print+(reverse split "", "dog"), "\n"