$ perl -e "print @ARGV;" ONE- TWO- ONE-TWO-$