in reply to Happy Birthday

I think I would use
print 'Happy Birthday ',$_%3?'to you':'Dear Steve',"!\n" for(1..4);
"to Steve" sounds like you're speaking to a third party.