NAME

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

SYNOPSIS

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

FUNCTIONS

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://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 2008 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.10.0 or, at your option, any later version of Perl 5 you may have available.