Help for this page

Select Code to Download


  1. or download this
    local $Data::Dumper::Useqq = 1;
  2. or download this
    my $DsGetDcName = Win32::API->new('Netapi32', 'DsGetDcName', 'PPSPNS',
+ 'N')
  or die Win32::FormatMessage(Win32::GetLastError);
  3. or download this
    my $DsGetDcName_declare = <<'END_OF_DECLARE';
  DWORD DsGetDcName(
...

my $DsGetDcName = Win32::API->new( Netapi32 => $DsGetDcName_declare )
    or die Win32::FormatMessage(Win32::GetLastError);