5 use vars qw|$VERSION $XS_VERSION @ISA @EXPORT @EXPORT_OK|;
10 @ISA = qw|Exporter DynaLoader|;
12 $XS_VERSION = $VERSION;
13 $VERSION = eval $VERSION;
18 OWNER_SECURITY_INFORMATION
19 GROUP_SECURITY_INFORMATION
20 DACL_SECURITY_INFORMATION
21 SACL_SECURITY_INFORMATION
49 CSIDL_DESKTOPDIRECTORY
53 CSIDL_COMMON_STARTMENU
56 CSIDL_COMMON_DESKTOPDIRECTORY
60 CSIDL_COMMON_FAVORITES
70 CSIDL_PROGRAM_FILES_COMMON
71 CSIDL_COMMON_TEMPLATES
72 CSIDL_COMMON_DOCUMENTS
73 CSIDL_COMMON_ADMINTOOLS
79 CSIDL_RESOURCES_LOCALIZED
84 # We won't bother with the constant stuff, too much of a hassle. Just hard
88 sub WIN31_CLASS { &NULL }
90 sub OWNER_SECURITY_INFORMATION { 0x00000001 }
91 sub GROUP_SECURITY_INFORMATION { 0x00000002 }
92 sub DACL_SECURITY_INFORMATION { 0x00000004 }
93 sub SACL_SECURITY_INFORMATION { 0x00000008 }
95 sub MB_ICONHAND { 0x00000010 }
96 sub MB_ICONQUESTION { 0x00000020 }
97 sub MB_ICONEXCLAMATION { 0x00000030 }
98 sub MB_ICONASTERISK { 0x00000040 }
99 sub MB_ICONWARNING { 0x00000030 }
100 sub MB_ICONERROR { 0x00000010 }
101 sub MB_ICONINFORMATION { 0x00000040 }
102 sub MB_ICONSTOP { 0x00000010 }
105 # Newly added constants. These have an empty prototype, unlike the
106 # the ones above, which aren't prototyped for compatibility reasons.
109 sub SW_SHOWNORMAL () { 1 }
110 sub SW_SHOWMINIMIZED () { 2 }
111 sub SW_SHOWMAXIMIZED () { 3 }
112 sub SW_SHOWNOACTIVATE () { 4 }
114 sub CSIDL_DESKTOP () { 0x0000 } # <desktop>
115 sub CSIDL_PROGRAMS () { 0x0002 } # Start Menu\Programs
116 sub CSIDL_PERSONAL () { 0x0005 } # "My Documents" folder
117 sub CSIDL_FAVORITES () { 0x0006 } # <user name>\Favorites
118 sub CSIDL_STARTUP () { 0x0007 } # Start Menu\Programs\Startup
119 sub CSIDL_RECENT () { 0x0008 } # <user name>\Recent
120 sub CSIDL_SENDTO () { 0x0009 } # <user name>\SendTo
121 sub CSIDL_STARTMENU () { 0x000B } # <user name>\Start Menu
122 sub CSIDL_MYMUSIC () { 0x000D } # "My Music" folder
123 sub CSIDL_MYVIDEO () { 0x000E } # "My Videos" folder
124 sub CSIDL_DESKTOPDIRECTORY () { 0x0010 } # <user name>\Desktop
125 sub CSIDL_NETHOOD () { 0x0013 } # <user name>\nethood
126 sub CSIDL_FONTS () { 0x0014 } # windows\fonts
127 sub CSIDL_TEMPLATES () { 0x0015 }
128 sub CSIDL_COMMON_STARTMENU () { 0x0016 } # All Users\Start Menu
129 sub CSIDL_COMMON_PROGRAMS () { 0x0017 } # All Users\Start Menu\Programs
130 sub CSIDL_COMMON_STARTUP () { 0x0018 } # All Users\Startup
131 sub CSIDL_COMMON_DESKTOPDIRECTORY () { 0x0019 } # All Users\Desktop
132 sub CSIDL_APPDATA () { 0x001A } # Application Data, new for NT4
133 sub CSIDL_PRINTHOOD () { 0x001B } # <user name>\PrintHood
134 sub CSIDL_LOCAL_APPDATA () { 0x001C } # non roaming, user\Local Settings\Application Data
135 sub CSIDL_COMMON_FAVORITES () { 0x001F }
136 sub CSIDL_INTERNET_CACHE () { 0x0020 }
137 sub CSIDL_COOKIES () { 0x0021 }
138 sub CSIDL_HISTORY () { 0x0022 }
139 sub CSIDL_COMMON_APPDATA () { 0x0023 } # All Users\Application Data
140 sub CSIDL_WINDOWS () { 0x0024 } # GetWindowsDirectory()
141 sub CSIDL_SYSTEM () { 0x0025 } # GetSystemDirectory()
142 sub CSIDL_PROGRAM_FILES () { 0x0026 } # C:\Program Files
143 sub CSIDL_MYPICTURES () { 0x0027 } # "My Pictures", new for Win2K
144 sub CSIDL_PROFILE () { 0x0028 } # USERPROFILE
145 sub CSIDL_PROGRAM_FILES_COMMON () { 0x002B } # C:\Program Files\Common
146 sub CSIDL_COMMON_TEMPLATES () { 0x002D } # All Users\Templates
147 sub CSIDL_COMMON_DOCUMENTS () { 0x002E } # All Users\Documents
148 sub CSIDL_COMMON_ADMINTOOLS () { 0x002F } # All Users\Start Menu\Programs\Administrative Tools
149 sub CSIDL_ADMINTOOLS () { 0x0030 } # <user name>\Start Menu\Programs\Administrative Tools
150 sub CSIDL_COMMON_MUSIC () { 0x0035 } # All Users\My Music
151 sub CSIDL_COMMON_PICTURES () { 0x0036 } # All Users\My Pictures
152 sub CSIDL_COMMON_VIDEO () { 0x0037 } # All Users\My Video
153 sub CSIDL_RESOURCES () { 0x0038 } # %windir%\Resources\, For theme and other windows resources.
154 sub CSIDL_RESOURCES_LOCALIZED () { 0x0039 } # %windir%\Resources\<LangID>, for theme and other windows specific resources.
155 sub CSIDL_CDBURN_AREA () { 0x003B } # <user name>\Local Settings\Application Data\Microsoft\CD Burning
157 ### This method is just a simple interface into GetOSVersion(). More
158 ### specific or demanding situations should use that instead.
160 my ($found_os, $found_desc);
163 my ($os,$desc,$major, $minor, $build, $id)=("","");
164 unless (defined $found_os) {
165 # If we have a run this already, we have the results cached
168 # Use the standard API call to determine the version
169 ($desc, $major, $minor, $build, $id) = Win32::GetOSVersion();
171 # If id==0 then its a win32s box -- Meaning Win3.11
176 # Magic numbers from MSDN documentation of OSVERSIONINFO
177 # Most version names can be parsed from just the id and minor
194 # This _really_ shouldnt happen. At least not for quite a while
195 # Politely warn and return undef
196 unless (defined $os) {
197 warn qq[Windows version [$id:$major:$minor] unknown!];
203 # But distinguising W2k and Vista from NT4 requires looking at the major version
205 $os = {5 => "2000", 6 => "Vista"}->{$major} || "NT4";
208 # For the rest we take a look at the build numbers and try to deduce
209 # the exact release name, but we put that in the $desc
210 elsif ($os eq "95") {
211 if ($build eq '67109814') {
214 elsif ($build eq '67306684') {
217 elsif ($build eq '67109975') {
221 elsif ($os eq "98" && $build eq '67766446') {
227 $desc = "$tag $desc";
234 # cache the results, so we dont have to do this again
235 $found_os = "Win$os";
239 return wantarray ? ($found_os, $found_desc) : $found_os;
242 # "no warnings 'redefine';" doesn't work for 5.8.7 and earlier
252 Win32 - Interfaces to some Win32 API Functions
256 The Win32 module contains functions to access Win32 APIs.
258 =head2 Alphabetical Listing of Win32 Functions
260 It is recommended to C<use Win32;> before any of these functions;
261 however, for backwards compatibility, those marked as [CORE] will
262 automatically do this for you.
264 In the function descriptions below the term I<Unicode string> is used
265 to indicate that the string may contain characters outside the system
266 codepage. The caveat I<If supported by the core Perl version>
267 generally means Perl 5.8.9 and later, though some Unicode pathname
268 functionality may work on earlier versions.
272 =item Win32::AbortSystemShutdown(MACHINE)
274 Aborts a system shutdown (started by the
275 InitiateSystemShutdown function) on the specified MACHINE.
277 =item Win32::BuildNumber()
279 [CORE] Returns the ActivePerl build number. This function is
280 only available in the ActivePerl binary distribution.
282 =item Win32::CopyFile(FROM, TO, OVERWRITE)
284 [CORE] The Win32::CopyFile() function copies an existing file to a new
285 file. All file information like creation time and file attributes will
286 be copied to the new file. However it will B<not> copy the security
287 information. If the destination file already exists it will only be
288 overwritten when the OVERWRITE parameter is true. But even this will
289 not overwrite a read-only file; you have to unlink() it first
292 =item Win32::CreateDirectory(DIRECTORY)
294 Creates the DIRECTORY and returns a true value on success. Check $^E
295 on failure for extended error information.
297 DIRECTORY may contain Unicode characters outside the system codepage.
298 Once the directory has been created you can use
299 Win32::GetANSIPathName() to get a name that can be passed to system
300 calls and external programs.
302 =item Win32::CreateFile(FILE)
304 Creates the FILE and returns a true value on success. Check $^E on
305 failure for extended error information.
307 FILE may contain Unicode characters outside the system codepage. Once
308 the file has been created you can use Win32::GetANSIPathName() to get
309 a name that can be passed to system calls and external programs.
311 =item Win32::DomainName()
313 [CORE] Returns the name of the Microsoft Network domain that the
314 owner of the current perl process is logged into. This function does
315 B<not> work on Windows 9x.
317 =item Win32::ExpandEnvironmentStrings(STRING)
319 Takes STRING and replaces all referenced environment variable
320 names with their defined values. References to environment variables
321 take the form C<%VariableName%>. Case is ignored when looking up the
322 VariableName in the environment. If the variable is not found then the
323 original C<%VariableName%> text is retained. Has the same effect
326 $string =~ s/%([^%]*)%/$ENV{$1} || "%$1%"/eg
328 However, this function may return a Unicode string if the environment
329 variable being expanded hasn't been assigned to via %ENV. Access
330 to %ENV is currently always using byte semantics.
332 =item Win32::FormatMessage(ERRORCODE)
334 [CORE] Converts the supplied Win32 error number (e.g. returned by
335 Win32::GetLastError()) to a descriptive string. Analogous to the
336 perror() standard-C library function. Note that C<$^E> used
337 in a string context has much the same effect.
339 C:\> perl -e "$^E = 26; print $^E;"
340 The specified disk or diskette cannot be accessed
342 =item Win32::FsType()
344 [CORE] Returns the name of the filesystem of the currently active
345 drive (like 'FAT' or 'NTFS'). In list context it returns three values:
346 (FSTYPE, FLAGS, MAXCOMPLEN). FSTYPE is the filesystem type as
347 before. FLAGS is a combination of values of the following table:
349 0x00000001 supports case-sensitive filenames
350 0x00000002 preserves the case of filenames
351 0x00000004 supports Unicode in filenames
352 0x00000008 preserves and enforces ACLs
353 0x00000010 supports file-based compression
354 0x00000020 supports disk quotas
355 0x00000040 supports sparse files
356 0x00000080 supports reparse points
357 0x00000100 supports remote storage
358 0x00008000 is a compressed volume (e.g. DoubleSpace)
359 0x00010000 supports object identifiers
360 0x00020000 supports the Encrypted File System (EFS)
362 MAXCOMPLEN is the maximum length of a filename component (the part
363 between two backslashes) on this file system.
365 =item Win32::FreeLibrary(HANDLE)
367 Unloads a previously loaded dynamic-link library. The HANDLE is
368 no longer valid after this call. See L<LoadLibrary|Win32::LoadLibrary(LIBNAME)>
369 for information on dynamically loading a library.
371 =item Win32::GetANSIPathName(FILENAME)
373 Returns an ANSI version of FILENAME. This may be the short name
374 if the long name cannot be represented in the system codepage.
376 While not currently implemented, it is possible that in the future
377 this function will convert only parts of the path to FILENAME to a
380 If FILENAME doesn't exist on the filesystem, or if the filesystem
381 doesn't support short ANSI filenames, then this function will
382 translate the Unicode name into the system codepage using replacement
385 =item Win32::GetArchName()
387 Use of this function is deprecated. It is equivalent with
388 $ENV{PROCESSOR_ARCHITECTURE}. This might not work on Win9X.
390 =item Win32::GetChipName()
392 Returns the processor type: 386, 486 or 586 for Intel processors,
393 21064 for the Alpha chip.
395 =item Win32::GetCwd()
397 [CORE] Returns the current active drive and directory. This function
398 does not return a UNC path, since the functionality required for such
399 a feature is not available under Windows 95.
401 If supported by the core Perl version, this function will return an
402 ANSI path name for the current directory if the long pathname cannot
403 be represented in the system codepage.
405 =item Win32::GetCurrentThreadId()
407 Returns the thread identifier of the calling thread. Until the thread
408 terminates, the thread identifier uniquely identifies the thread
409 throughout the system.
411 Note: the current process identifier is available via the predefined
414 =item Win32::GetFileVersion(FILENAME)
416 Returns the file version number from the VERSIONINFO resource of
417 the executable file or DLL. This is a tuple of four 16 bit numbers.
418 In list context these four numbers will be returned. In scalar context
419 they are concatenated into a string, separated by dots.
421 =item Win32::GetFolderPath(FOLDER [, CREATE])
423 Returns the full pathname of one of the Windows special folders.
424 The folder will be created if it doesn't exist and the optional CREATE
425 argument is true. The following FOLDER constants are defined by the
426 Win32 module, but only exported on demand:
431 CSIDL_COMMON_ADMINTOOLS
433 CSIDL_COMMON_DESKTOPDIRECTORY
434 CSIDL_COMMON_DOCUMENTS
435 CSIDL_COMMON_FAVORITES
437 CSIDL_COMMON_PICTURES
438 CSIDL_COMMON_PROGRAMS
439 CSIDL_COMMON_STARTMENU
441 CSIDL_COMMON_TEMPLATES
445 CSIDL_DESKTOPDIRECTORY
460 CSIDL_PROGRAM_FILES_COMMON
463 CSIDL_RESOURCES_LOCALIZED
471 Note that not all folders are defined on all versions of Windows.
473 Please refer to the MSDN documentation of the CSIDL constants,
474 currently available at:
476 http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/enums/csidl.asp
478 This function will return an ANSI folder path if the long name cannot
479 be represented in the system codepage. Use Win32::GetLongPathName()
480 on the result of Win32::GetFolderPath() if you want the Unicode
481 version of the folder name.
483 =item Win32::GetFullPathName(FILENAME)
485 [CORE] GetFullPathName combines the FILENAME with the current drive
486 and directory name and returns a fully qualified (aka, absolute)
487 path name. In list context it returns two elements: (PATH, FILE) where
488 PATH is the complete pathname component (including trailing backslash)
489 and FILE is just the filename part. Note that no attempt is made to
490 convert 8.3 components in the supplied FILENAME to longnames or
491 vice-versa. Compare with Win32::GetShortPathName() and
492 Win32::GetLongPathName().
494 If supported by the core Perl version, this function will return an
495 ANSI path name if the full pathname cannot be represented in the
498 =item Win32::GetLastError()
500 [CORE] Returns the last error value generated by a call to a Win32 API
501 function. Note that C<$^E> used in a numeric context amounts to the
504 =item Win32::GetLongPathName(PATHNAME)
506 [CORE] Returns a representation of PATHNAME composed of longname
507 components (if any). The result may not necessarily be longer
508 than PATHNAME. No attempt is made to convert PATHNAME to the
509 absolute path. Compare with Win32::GetShortPathName() and
510 Win32::GetFullPathName().
512 This function may return the pathname in Unicode if it cannot be
513 represented in the system codepage. Use Win32::GetANSIPathName()
514 before passing the path to a system call or another program.
516 =item Win32::GetNextAvailDrive()
518 [CORE] Returns a string in the form of "<d>:" where <d> is the first
519 available drive letter.
521 =item Win32::GetOSVersion()
523 [CORE] Returns the list (STRING, MAJOR, MINOR, BUILD, ID), where the
524 elements are, respectively: An arbitrary descriptive string, the major
525 version number of the operating system, the minor version number, the
526 build number, and a digit indicating the actual operating system.
527 For the ID, the values are 0 for Win32s, 1 for Windows 9X/Me and 2 for
528 Windows NT/2000/XP/2003. In scalar context it returns just the ID.
530 Currently known values for ID MAJOR and MINOR are as follows:
537 Windows NT 3.51 2 3 51
541 Windows Server 2003 2 5 2
544 On Windows NT 4 SP6 and later this function returns the following
545 additional values: SPMAJOR, SPMINOR, SUITEMASK, PRODUCTTYPE.
547 SPMAJOR and SPMINOR are are the version numbers of the latest
548 installed service pack.
550 SUITEMASK is a bitfield identifying the product suites available on
551 the system. Known bits are:
553 VER_SUITE_SMALLBUSINESS 0x00000001
554 VER_SUITE_ENTERPRISE 0x00000002
555 VER_SUITE_BACKOFFICE 0x00000004
556 VER_SUITE_COMMUNICATIONS 0x00000008
557 VER_SUITE_TERMINAL 0x00000010
558 VER_SUITE_SMALLBUSINESS_RESTRICTED 0x00000020
559 VER_SUITE_EMBEDDEDNT 0x00000040
560 VER_SUITE_DATACENTER 0x00000080
561 VER_SUITE_SINGLEUSERTS 0x00000100
562 VER_SUITE_PERSONAL 0x00000200
563 VER_SUITE_BLADE 0x00000400
564 VER_SUITE_EMBEDDED_RESTRICTED 0x00000800
565 VER_SUITE_SECURITY_APPLIANCE 0x00001000
567 The VER_SUITE_xxx names are listed here to crossreference the Microsoft
568 documentation. The Win32 module does not provide symbolic names for these
571 PRODUCTTYPE provides additional information about the system. It should
572 be one of the following integer values:
574 1 - Workstation (NT 4, 2000 Pro, XP Home, XP Pro)
578 =item Win32::GetOSName()
580 In scalar context returns the name of the Win32 operating system
581 being used. In list context returns a two element list of the OS name
582 and whatever edition information is known about the particular build
583 (for Win9X boxes) and whatever service packs have been installed.
584 The latter is roughly equivalent to the first item returned by
585 GetOSVersion() in list context.
587 Currently the possible values for the OS name are
589 Win32s Win95 Win98 WinMe WinNT3.51 WinNT4 Win2000 WinXP/.Net Win2003
591 This routine is just a simple interface into GetOSVersion(). More
592 specific or demanding situations should use that instead. Another
593 option would be to use POSIX::uname(), however the latter appears to
594 report only the OS family name and not the specific OS. In scalar
595 context it returns just the ID.
597 The name "WinXP/.Net" is used for historical reasons only, to maintain
598 backwards compatibility of the Win32 module. Windows .NET Server has
599 been renamed as Windows 2003 Server before final release and uses a
600 different major/minor version number than Windows XP.
602 =item Win32::GetShortPathName(PATHNAME)
604 [CORE] Returns a representation of PATHNAME that is composed of short
605 (8.3) path components where available. For path components where the
606 file system has not generated the short form the returned path will
607 use the long form, so this function might still for instance return a
608 path containing spaces. Compare with Win32::GetFullPathName() and
609 Win32::GetLongPathName().
611 =item Win32::GetProcAddress(INSTANCE, PROCNAME)
613 Returns the address of a function inside a loaded library. The
614 information about what you can do with this address has been lost in
615 the mist of time. Use the Win32::API module instead of this deprecated
618 =item Win32::GetTickCount()
620 [CORE] Returns the number of milliseconds elapsed since the last
621 system boot. Resolution is limited to system timer ticks (about 10ms
622 on WinNT and 55ms on Win9X).
624 =item Win32::GuidGen()
626 Creates a globally unique 128 bit integer that can be used as a
627 persistent identifier in a distributed setting. To a very high degree
628 of certainty this function returns a unique value. No other
629 invocation, on the same or any other system (networked or not), should
630 return the same value.
632 The return value is formatted according to OLE conventions, as groups
633 of hex digits with surrounding braces. For example:
635 {09531CF1-D0C7-4860-840C-1C8C8735E2AD}
637 =item Win32::InitiateSystemShutdown
639 (MACHINE, MESSAGE, TIMEOUT, FORCECLOSE, REBOOT)
641 Shutsdown the specified MACHINE, notifying users with the
642 supplied MESSAGE, within the specified TIMEOUT interval. Forces
643 closing of all documents without prompting the user if FORCECLOSE is
644 true, and reboots the machine if REBOOT is true. This function works
647 =item Win32::IsAdminUser()
649 Returns non zero if the account in whose security context the
650 current process/thread is running belongs to the local group of
651 Administrators in the built-in system domain; returns 0 if not.
652 On Windows Vista it will only return non-zero if the process is
653 actually running with elevated privileges. Returns the undefined
654 value and prints a warning if an error occurred. This function always
657 =item Win32::IsWinNT()
659 [CORE] Returns non zero if the Win32 subsystem is Windows NT.
661 =item Win32::IsWin95()
663 [CORE] Returns non zero if the Win32 subsystem is Windows 95.
665 =item Win32::LoadLibrary(LIBNAME)
667 Loads a dynamic link library into memory and returns its module
668 handle. This handle can be used with Win32::GetProcAddress() and
669 Win32::FreeLibrary(). This function is deprecated. Use the Win32::API
672 =item Win32::LoginName()
674 [CORE] Returns the username of the owner of the current perl process.
675 The return value may be a Unicode string.
677 =item Win32::LookupAccountName(SYSTEM, ACCOUNT, DOMAIN, SID, SIDTYPE)
679 Looks up ACCOUNT on SYSTEM and returns the domain name the SID and
682 =item Win32::LookupAccountSID(SYSTEM, SID, ACCOUNT, DOMAIN, SIDTYPE)
684 Looks up SID on SYSTEM and returns the account name, domain name,
687 =item Win32::MsgBox(MESSAGE [, FLAGS [, TITLE]])
689 Create a dialogbox containing MESSAGE. FLAGS specifies the
690 required icon and buttons according to the following table:
694 2 = Abort, Retry, and Ignore
695 3 = Yes, No and Cancel
699 MB_ICONSTOP "X" in a red circle
700 MB_ICONQUESTION question mark in a bubble
701 MB_ICONEXCLAMATION exclamation mark in a yellow triangle
702 MB_ICONINFORMATION "i" in a bubble
704 TITLE specifies an optional window title. The default is "Perl".
706 The function returns the menu id of the selected push button:
718 =item Win32::NodeName()
720 [CORE] Returns the Microsoft Network node-name of the current machine.
722 =item Win32::OutputDebugString(STRING)
724 Sends a string to the application or system debugger for display.
725 The function does nothing if there is no active debugger.
727 Alternatively one can use the I<Debug Viewer> application to
728 watch the OutputDebugString() output:
730 http://www.microsoft.com/technet/sysinternals/utilities/debugview.mspx
732 =item Win32::RegisterServer(LIBRARYNAME)
734 Loads the DLL LIBRARYNAME and calls the function DllRegisterServer.
736 =item Win32::SetChildShowWindow(SHOWWINDOW)
738 [CORE] Sets the I<ShowMode> of child processes started by system().
739 By default system() will create a new console window for child
740 processes if Perl itself is not running from a console. Calling
741 SetChildShowWindow(0) will make these new console windows invisible.
742 Calling SetChildShowWindow() without arguments reverts system() to the
743 default behavior. The return value of SetChildShowWindow() is the
744 previous setting or C<undef>.
746 The following symbolic constants for SHOWWINDOW are available
747 (but not exported) from the Win32 module: SW_HIDE, SW_SHOWNORMAL,
748 SW_SHOWMINIMIZED, SW_SHOWMAXIMIZED and SW_SHOWNOACTIVATE.
750 =item Win32::SetCwd(NEWDIRECTORY)
752 [CORE] Sets the current active drive and directory. This function does not
753 work with UNC paths, since the functionality required to required for
754 such a feature is not available under Windows 95.
756 =item Win32::SetLastError(ERROR)
758 [CORE] Sets the value of the last error encountered to ERROR. This is
759 that value that will be returned by the Win32::GetLastError()
762 =item Win32::Sleep(TIME)
764 [CORE] Pauses for TIME milliseconds. The timeslices are made available
765 to other processes and threads.
767 =item Win32::Spawn(COMMAND, ARGS, PID)
769 [CORE] Spawns a new process using the supplied COMMAND, passing in
770 arguments in the string ARGS. The pid of the new process is stored in
771 PID. This function is deprecated. Please use the Win32::Process module
774 =item Win32::UnregisterServer(LIBRARYNAME)
776 Loads the DLL LIBRARYNAME and calls the function