#!perl -p
$a=$_;tr/()b/)(d/;$_="happy ".reverse($_)." new $a year!"