The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

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

SYNOPSIS

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

DESCRIPTION

This document describes version 0.78 of Sys::Info::Driver::Windows released on 17 April 2011.

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.

CPUFeatures

TODO

registry

Returns a Win32::TieRegistry hashref.

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 Gursoy <burak@cpan.org>.

COPYRIGHT

Copyright 2006 - 2011 Burak Gursoy. 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.12.2 or, at your option, any later version of Perl 5 you may have available.