clean up some of the POD formatting
This commit is contained in:
vecāks
ff85f4a89d
revīzija
e46562448e
|
@ -1,5 +1,8 @@
|
|||
Revision history for Net-Wireless-802_11-WPA-CLI
|
||||
|
||||
2.1.0 2018-?-?/?:?
|
||||
- POD formatting cleanup.
|
||||
|
||||
2.1.0 2011-08-19/06:00
|
||||
-Add missing dependency to Makefile.PL.
|
||||
-POD cleanup.
|
||||
|
|
|
@ -33,7 +33,7 @@ This initializes the object to be used for making use of wpa_cli.
|
|||
|
||||
my $foo->Net::Wireless::802_11::WPA::CLI->new();
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
||||
=cut
|
||||
|
@ -92,7 +92,7 @@ No arguments are taken.
|
|||
|
||||
The returned value is a the new network ID.
|
||||
|
||||
$newNetworkID=$foo->add_network;
|
||||
$newNetworkID=$foo->add_network;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -185,9 +185,9 @@ This is the SSID for the for AP in question.
|
|||
|
||||
my %status=$foo->bss($bssid);
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
||||
|
||||
=cut
|
||||
|
||||
sub bss{
|
||||
|
@ -254,7 +254,7 @@ Disconnect and wait for a reassosiate command.
|
|||
|
||||
No arguments are taken.
|
||||
|
||||
$return=$foo->disconnect;
|
||||
$return=$foo->disconnect;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -277,7 +277,7 @@ This disables a network ID.
|
|||
|
||||
One argument is required and that is the network ID in question.
|
||||
|
||||
$foo->disable_network($networkID)
|
||||
$foo->disable_network($networkID)
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -309,7 +309,7 @@ This enables a network ID.
|
|||
|
||||
One argument is required and that is the network ID to enable.
|
||||
|
||||
$foo->enable_network($networkID)
|
||||
$foo->enable_network($networkID)
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -348,7 +348,7 @@ that can be requested are as below.
|
|||
|
||||
No arguments are taken.
|
||||
|
||||
my @capabilities=$foo->get_capability('eap');
|
||||
my @capabilities=$foo->get_capability('eap');
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -408,7 +408,7 @@ This gets a variable for for a specific network ID.
|
|||
|
||||
Two arguments are taken and that is the network ID and variable.
|
||||
|
||||
$value=$foo->get_network($networkID, $variable);
|
||||
$value=$foo->get_network($networkID, $variable);
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -474,7 +474,7 @@ it will be set to 'any'.
|
|||
|
||||
This is the flags for the network. This key may not be defined.
|
||||
|
||||
%return=$foo->list_networks;
|
||||
%return=$foo->list_networks;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -538,7 +538,7 @@ This sets a new password for a network.
|
|||
Two arguments are taken. The first is the network ID and
|
||||
the second is the new password.
|
||||
|
||||
$return=$foo->new_password($networkID, $newpass);
|
||||
$return=$foo->new_password($networkID, $newpass);
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -569,7 +569,7 @@ This sets the pin for a network.
|
|||
|
||||
Two arguments are taken. The first is the network ID and the second is the pin.
|
||||
|
||||
$foo->pin($networkID, $newpin);
|
||||
$foo->pin($networkID, $newpin);
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -600,7 +600,7 @@ Force preauthentication for a BSSID.
|
|||
|
||||
One argument is accepted and the is the BSSID in question.
|
||||
|
||||
$foo->preauthenticate($BSSID);
|
||||
$foo->preauthenticate($BSSID);
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -647,7 +647,7 @@ This causes wpa_supplicant to reread it's configuration file.
|
|||
|
||||
No arguments are taken.
|
||||
|
||||
$return=$obj->reconfigure;
|
||||
$return=$obj->reconfigure;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -670,7 +670,7 @@ This removes the specified network.
|
|||
|
||||
One argument is accepted and it the network ID.
|
||||
|
||||
$return=$foo->remove_network($networkID)
|
||||
$return=$foo->remove_network($networkID)
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -702,7 +702,7 @@ does not need write permissions to file being used
|
|||
|
||||
No arguments are taken.
|
||||
|
||||
my $returned=$foo->save_config;
|
||||
my $returned=$foo->save_config;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -725,7 +725,7 @@ This requests a new BSS scan.
|
|||
|
||||
No arguments are taken.
|
||||
|
||||
my $returned=$foo->scan;
|
||||
my $returned=$foo->scan;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -771,13 +771,13 @@ This is the signal level of the seen AP.
|
|||
|
||||
This is the flags for the AP.
|
||||
|
||||
my %scan=$foo->scan_results;
|
||||
my %scan=$foo->scan_results;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}else{
|
||||
|
||||
|
||||
print "BSSID, SSID, FREQ, SIGNAL, FLAGS\n";
|
||||
|
||||
|
||||
my @keys=keys(%scan);
|
||||
my $int=0;
|
||||
while( defined( $keys[$int] ) ){
|
||||
|
@ -785,7 +785,7 @@ This is the flags for the AP.
|
|||
$scan{$keys[$int]}{frequency}.', '
|
||||
.$scan{$keys[$int]}{signal}.', '
|
||||
.$scan{$keys[$int]}{flags};
|
||||
|
||||
|
||||
$int++;
|
||||
}
|
||||
}
|
||||
|
@ -848,7 +848,7 @@ This is the network ID to select, while disabling the others.
|
|||
|
||||
One argument is accepted and it is the network ID to select.
|
||||
|
||||
$return=$foo->select_network($networkID)
|
||||
$return=$foo->select_network($networkID)
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -881,7 +881,7 @@ Three arguments are taken. The first is the network ID,
|
|||
the second is the variable to set, and the third is the
|
||||
value to set it to.
|
||||
|
||||
$foo->set_network($networkID, $variable, $value);
|
||||
$foo->set_network($networkID, $variable, $value);
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -914,9 +914,9 @@ No arguments are taken.
|
|||
|
||||
my %status=$foo->status;
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
||||
|
||||
=cut
|
||||
|
||||
sub status{
|
||||
|
@ -956,10 +956,10 @@ sub status{
|
|||
|
||||
This gets the MIB variables (dot1x, dot11).
|
||||
|
||||
%return=$foo->mib;
|
||||
%return=$foo->mib;
|
||||
if( $foo->error ){
|
||||
warn('error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
warn('error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
||||
=cut
|
||||
|
||||
|
@ -1001,10 +1001,10 @@ A status of 'FAIL' will also set a error of 5.
|
|||
|
||||
A unknown status will also set a error of 6.
|
||||
|
||||
$returned=$foo->run_TF_command($command, 0);
|
||||
$returned=$foo->run_TF_command($command, 0);
|
||||
if( $foo->error ){
|
||||
warn('error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
warn('error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
||||
=cut
|
||||
|
||||
|
@ -1054,7 +1054,7 @@ arguments for it.
|
|||
UNDEF is returned upon with running wpa_cli. Otherwise the return is the return
|
||||
from executed command.
|
||||
|
||||
$returned=$foo->run_command($command)
|
||||
$returned=$foo->run_command($command)
|
||||
if( $foo->error ){
|
||||
warn('Error:'.$foo->error.': '.$foo->errorString);
|
||||
}
|
||||
|
@ -1204,7 +1204,7 @@ L<http://search.cpan.org/dist/Net-Wireless-802_11-WPA-CLI>
|
|||
|
||||
=head1 COPYRIGHT & LICENSE
|
||||
|
||||
Copyright 2011 Zane C. Bowers-Hadley, all rights reserved.
|
||||
Copyright 2018 Zane C. Bowers-Hadley, all rights reserved.
|
||||
|
||||
This program is free software; you can redistribute it and/or modify it
|
||||
under the same terms as Perl itself.
|
||||
|
|
Notiek ielāde…
Atsaukties uz šo jaunā problēmā