Extracting 1st letter of each word

I'm trying to extract the first letter in each word for a particular contact. For example, the company name of "Premier Party Rentals" would return "PPR". I'm assuming it's fairly simple. I've explored a few functions but they haven't given me the results I'm looking for.