Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
...

Win32::API->Import("kernel32", "INT SPI_GETSCREENSAVETIMEOUT()"); 
my $foo = SPI_GETSCREENSAVETIMEOUT();
  2. or download this
    Undefined subroutine &main::SPI_GETSCREENSAVETIMEOUT called at ...
  3. or download this
    Win32::API->Import("kernel32", "int GetCurrentProcessId()");
$PID = GetCurrentProcessId();