The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

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

1 POD Error

The following errors were encountered while parsing the POD:

Around line 162:

Non-ASCII character seen before =encoding in 'Gürsoy,'. Assuming CP1252