$str = 'a b c o o p s h u h ? ';
print $& while $str =~ /.\s/g;