C:\test>\AS817\perl\bin\perl5.8.8.exe  -Mlib=\perl\site\lib -MWin32::API -mstrict -w
Win32::API->Import(
   'urlmon', 'URLDownloadToFile', 'PPPNP', 'N',
);

my $pCaller    = 0;
my $szURL      = 'http://somedomain.com/pic.jpg';
my $szFileName = 'c:\1img.jpg';
my $dwReserved = 8;  # Download from offline cache
my $lpfnCB     = 0;

my $res = URLDownloadToFile(
   undef,
   $szURL,
   $szFileName,
   $dwReserved,
   undef,
) or die Win32::FormatMessage(Win32::GetLastError);
^Z
Use of uninitialized value in subroutine entry at (eval 2) line 2, <DATA> line 164.
Use of uninitialized value in subroutine entry at (eval 2) line 2, <DATA> line 164.