$ perl -MData::Dump -e " dd\@ARGV "  -- --foo='bar1 bar2 bar3'
["--foo='bar1", "bar2", "bar3'"]