in reply to Splitting each word in a string

Split takes a regex as delimiter, so you can use: 
my @words = split /\s+/, $string;

[download]

In Section Seekers of Perl Wisdom