The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
Win32-Wlan-0.06
River stage zero No dependents
++
/ Win32::Wlan

NAME

Win32::Wlan - Query wlan properties

SYNOPSIS

    require Win32::Wlan;
    my $wlan = Win32::Wlan->new;
    if ($wlan->available) {
        print "Connected to ", $wlan->connection->{profile_name},"\n";
        print "I see the following networks\n";
        for ($wlan->visible_networks) {
            printf "%s\t-%d dbm\n", $_->{name}, $_->{signal_quality};
        };

    } else {
        print "No Wlan detected (or switched off)\n";
    };

METHODS

Win32::Wlan->new( %args )

    my $wlan = Win32::Wlan->new();

Creates a new Win32::Wlan object.

  • available - optional argument to force detection of general Wlan availability

  • handle - optional argument to give an existing Wlan handle to the object

  • interface - optional argument to give an existing guuid to the object

$wlan->handle

Returns the Windows API handle for the Wlan API.

$wlan->interface

    print $wlan->interface->{name};

Returns a hashref describing the interface. The keys are guuid for the guuid, name for the human-readable name and status for the status of the interface.

$wlan->available

    $wlan->available
        or warn "Wlan API is not available";

Returns whether the Wlan API is available. The Wlan API is available on Windows XP SP3 or higher.

$wlan->connected

    $wlan->connected
        or warn "Wlan connection unavailable";

Returns whether a Wlan connection is established. No connection is established when Wlan is switched off or no access point is in range.

$wlan->connection

    if ($wlan->connected) {
        print "Connected to ";
        print $wlan->connection->{profile_name};
    };

Returns information about the current connection in a hashref. The keys are

  • profile_name - the name of the profile of the current connection

$wlan->visible_networks

Returns information about the currently visible networks as a list of hashrefs.

  • ssid - the SSID of the network

  • signal_quality - the signal quality ranging linearly from 0 to 100 meaning -100 dbm to -50 dbm

SIMPLIFICATIONS

This module only supports the first wireless connection. If your machine has more than one wireless connection, you will need to use Win32::Wlan::API directly.

Currently, the module also has no way of determining whether Wlan gets switched on or off.

SEE ALSO

Win32::Wlan::API - the wrapper for the Windows API

Windows Native Wifi Reference

http://msdn.microsoft.com/en-us/library/ms706274%28v=VS.85%29.aspx

REPOSITORY

The public repository of this module is http://github.com/Corion/Win32-Wlan.

SUPPORT

The public support forum of this module is http://perlmonks.org/.

BUG TRACKER

Please report bugs in this module via the RT CPAN bug queue at https://rt.cpan.org/Public/Dist/Display.html?Name=Win32-Wlan or via mail to win32-wlan-Bugs@rt.cpan.org.

AUTHOR

Max Maischein corion@cpan.org

COPYRIGHT (c)

Copyright 2011-2011 by Max Maischein corion@cpan.org.

LICENSE

This module is released under the same terms as Perl itself.