perl -e '$blub="a b   c"; @blub=split(" ",$blub); foreach(@blub) {$c++; print "$c $_\n"}'
1 a
2 b
3 c