#include <stdio.h>
int main(int argc, char* argv[])
{
   int i;
   for (i = 0; i < argc; ++i) { printf("%d:%s:\n", i, argv[i]); }
   return 0;
}

##</code><code>##

> arg.exe "abc "" xyz"

##</code><code>##

0:arg.exe:
1:abc " xyz:

##</code><code>##

for my $arg (@ARGV) { print "$arg:\n" }

##</code><code>##

> perl arg.pl "abc "" xyz"

##</code><code>##

abc ":
xyz:

##</code><code>##

use strict;
use warnings;
use Win32::API;
my $getcmdline = Win32::API->new( 'kernel32.dll', 'GetCommandLine', [], 'P' )
   or die "error: Win32::API GetCommandLine: $^E";
my $cmdline = pack 'Z*', $getcmdline->Call();
$cmdline =~ tr/\0//d;     # remove any NULLs left over from pack Z*
$cmdline =~ s/\s+$//;     # remove trailing white space
print "cmdline=$cmdline:\n";