C:\camelbox\bin>perl -e "sub foo{ print join '#',@_; } foo(1,,,,,2);" 1#2