my @words = split ' ', "The quick brown (it's a slightly reddish brown) fox jumps over the lazy dog";
print "$_\n" for @words;