String Perl

printf("%s's %s is named %s.\n", "Eric", "cat", "Halloween");