in reply to Easy one-liner

$_ ='1111 "222 222" 333 4444 55 666 77777'; print join(",", (/"?((?<!")\S+(?<!")|[^"]+)"?\s*/g)[0,1,2,4,5,6]);

This gives you:

1111,222 222,333,55,666,77777