The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

WWW::USF::WebAuth - Access to USF's WebAuth system

VERSION

Version 0.003

SYNOPSIS

  use Carp ();
  use WWW::USF::WebAuth ();

  # Create a new WebAuth object
  my $webauth = WWW::USF::WebAuth->new(
      netid    => 'teststudent',
      password => 'PassW0rd!',
  );

  my $response = $webauth->authenticate(
      # Connect to USF Blackboard system
      service => 'https://learn.usf.edu/webapps/login/?new_loc=useCas'
  );

  if (!$response->is_success) {
      # Authentication failed, so just bail here
      Carp::carp('Authentication with WebAuth failed');
  }

  # The authentication was successful
  printf qq{You may navigate to %s and be logged in as %s\n},
      $response->destination,
      $webauth->netid;

DESCRIPTION

This provides a way in which you can interact with the WebAuth system at the University of South Florida.

CONSTRUCTOR

This is fully object-oriented, and as such before any method can be used, the constructor needs to be called to create an object to work with. Please see the documentation for Authen::CAS::External.

ATTRIBUTES

Please see the documentation for Authen::CAS::External.

netid

This is a string which is the NetID of the user. This attribute directly maps to the inherited username attribute.

METHODS

This module provides the identical methods as Authen::CAS::External and you should look at the documentation for the supported methods.

clear_netid

This will clear the value for "netid".

has_netid

This will report if the current instance has "netid" defined.

DEPENDENCIES

AUTHOR

Douglas Christopher Wilson, <doug at somethingdoug.com>

BUGS AND LIMITATIONS

Please report any bugs or feature requests to bug-www-usf-webauth at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=WWW-USF-WebAuth. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

  perldoc WWW::USF::WebAuth

You can also look for information at:

LICENSE AND COPYRIGHT

Copyright 2010 Douglas Christopher Wilson, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the terms of either:

  • the GNU General Public License as published by the Free Software Foundation; either version 1, or (at your option) any later version, or

  • the Artistic License version 2.0.