$n=<>;print"Happy birthday ",--$n?"to you":"dear anagol",$_>3?"!":",
"for 1..4