NAME

Sys::Info::Driver::Windows - Windows driver for Sys::Info

SYNOPSIS

use Sys::Info::Driver::Windows::XS qw(:metrics);
if ( GetSystemMetrics(SM_SERVERR2) ) {
    # do something ...
}

DESCRIPTION

This is the main module in the Windows driver collection.

METHODS

None.

FUNCTIONS

The following functions will be automatically exported when the module is used.

WMI

Returns the WMI object.

WMI_FOR CLASS

Returns the WMI object for the supplied WMI Class name.

decode_serial_key KEY

Decodes the base24 encoded KEY.

GetSystemMetrics

Interface to GetSystemMetrics Windows function. Accepts an integer as the parameter. The interface is incomplete (as Sys::Info does not need the rest) and only these constants are defined:

SM_TABLETPC
SM_MEDIACENTER
SM_SERVERR2
SM_STARTER

All these constants and the function itself can be imported by the :metrics key.

GetSystemInfo

An interface to the Win32 API function GetSystemInfo:

my %si = GetSystemInfo();
printf("CPU: %s Family %s Model %s Stepping %s\n",
    @si{qw/
        wProcessorArchitecture2
        wProcessorLevel
        wProcessorModel
        wProcessorStepping
    /}
);

SEE ALSO

Sys::Info, http://www.perlmonks.org/?node_id=497616, http://msdn.microsoft.com/en-us/library/ms724385(VS.85).aspx, http://msdn.microsoft.com/en-us/library/ms724429(VS.85).aspx.

AUTHOR

Burak Gürsoy, <burak@cpan.org>

COPYRIGHT

Copyright 2006-2009 Burak Gürsoy. All rights reserved.

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.

cpanm Sys::Info::Driver::Windows

perl -MCPAN -e shell
install Sys::Info::Driver::Windows