print$_,$/while CHRISTMAS=~/./gc?$_.=$&:s/\w/ /