$ perl -Ishabba -e " use Data::Dump; use Devel::PL_origargv; dd( \@INC, \@ARGV , [ Devel::PL_origargv->get  ] )" -- ro sham bo
(
  [
    "D:\\PL_origargv_shoulndtuseinlinedirectly\\_Inline\\lib",
    "shabba",
    "C:/citrusperl/site/lib/MSWin32-x86-multi-thread",
    "C:/citrusperl/site/lib",
    "C:/citrusperl/vendor/lib",
    "C:/citrusperl/lib",
    ".",
  ],
  ["ro", "sham", "bo"],
  [
    "C:\\citrusperl\\bin\\perl.exe",
    "-Ishabba",
    "-e",
    " use Data::Dump; use Devel::PL_origargv; dd( \\\@INC, \\\@ARGV , [ Devel::PL_origargv->get  ] )",
    "--",
    "ro",
    "sham",
    "bo",
  ],
)