! 5. Happy birthday to you!
4 [1,b] [ "Happy birthday " swap 3 = "dear Pradnya!" "to you!" ? append ] map [ . ] each
! Or: (suggested by @abeaumont on #concatenative)
"Happy birthday " 4 [ 2 = "dear Pradnya!" "to you!" ? append . ] with each-integer