$ perl -lpe '($_=()=/\s+/g)++' foo 1 bar baz 2 foo bar baz 3