in reply to words wich ends with "f"
I'd go with something like this (yeah, TIMTOWTDI):
$s = "four fifth two frog left leaf fred wolf";
@f = grep (/^[^f]\w*f\w*$/, split(' ', $s));
Bought a souvenir
Emailed all my friends about it
Got blowed up
Hit him right dead in the jaw
Made it awkward
Took a selfie
Want to go home
Results (400 votes). Check out past polls.