Node and domain information : Win32 « Win32 « Perl






  1. Perl
  2. Win32
  3. Win32

Node and domain information

  

#!/usr/bin/perl -w
use Win32;
          
$node   = Win32::NodeName();
$domain = Win32::DomainName();

# Print info.
print "Node=$node, Domain=$domain\n";








Related examples in the same category

1.Is windows 95
2.Is windows NT
3.OS version
4.Gets user login name on Windows
5.The Win32::Spawn function acts much like the system function and the Windows start command.
6.Convert a Windows-specific error to a text string using the Win32::FormatMessage function.