$_ = "_"; print; tr/_/J/; print .''; tr/J/u/; print .''.tr/u/s/; print .tr/s/t/; print .tr/t/ /;