$ perl -MDevel::PL_origargv -e" dd( Devel::PL_origargv->get ) " "ro""shambo"  "ro "" shambo"
(
  "D:\\perl\\citrusperl\\bin\\perl.exe",
  "-MDevel::PL_origargv",
  "-e dd( Devel::PL_origargv->get ) ",
  "ro\"shambo  ro",
  "",
  "shambo",
)