/./gs,print$&for(reverse$/x27,<>)x27