In Perl you could write

print "I ate a $fruit for $meal"

Or

printf 'I ate a %s for %s', $fruit, $meal