Win32::API::Struct->typedef('WLAN_CONNECTION_PARAMETERS', qw(
  WLAN_CONNECTION_MODE wlanConnectionMode;
  LPCWSTR              strProfile;
  PDOT11_SSID          pDot11Ssid;
  PDOT11_BSSID_LIST    pDesiredBssidList;
  DOT11_BSS_TYPE       dot11BssType;
  DWORD                dwFlags;
  ));
  

Win32::API::Struct->typedef ('DOT11_SSID', qw(
  ULONG uSSIDLength;
  UCHAR ucSSID;
));


##</code><code>##

# unused
Win32::API::Struct->typedef('WLAN_CONNECTION_MODE', qw(
  wlan_connection_mode_profile = 0,
  wlan_connection_mode_temporary_profile,
  wlan_connection_mode_discovery_secure,
  wlan_connection_mode_discovery_unsecure,
  wlan_connection_mode_auto,
  wlan_connection_mode_invalid    
));

##</code><code>##

C:\Documents and Settings\Owner\Desktop\cpan libs\Win32-Wlan-0.06>perl wlan.pl
Win32::API::Struct::typedef: unknown member type="WLAN_CONNECTION_MODE", name="w
lanConnectionMode" at C:/perl512/site/lib/Win32/API/Struct.pm line 46.
Win32::API::Struct::typedef: unknown member type="wlan_connection_mode_profile",
 name="=" at C:/perl512/site/lib/Win32/API/Struct.pm line 46.
Unknown Win32::API::Struct 'WLAN_CONNECTION_PARAMETERS' at C:/perl512/site/lib/W
in32/Wlan/API.pm line 373
Can't call method "Pack" on unblessed reference at C:/perl512/site/lib/Win32/Wla
n/API.pm line 381.

C:\Documents and Settings\Owner\Desktop\cpan libs\Win32-Wlan-0.06>