NAME

Test::OpenID::Server - setup a simulated OpenID server

SYNOPSIS

Test::OpenID::Server will provide a server to test your OpenID client against. To use it, do something like this:

            

              
              
use Test::More tests => 1;
use Test::OpenID::Server;
my $server   = Test::OpenID::Server->new;
my $url_root = $server->started_ok("server started ok");
            
          

Now you can run your OpenID tests against the URL in $url_root. Identities are any URL in the form of $url_root . "/foo". There is one special identity: /unknown. This identity will causes the OpenID server to return a non-identity page (which will mean the OpenID client won't find an identity). Every other identity will return a successful authentication.

METHODS

new

Create a new test OpenID server

started_ok

Test whether the server started, and if it did, return the URL it's at.

INTERAL METHODS

These methods implement the HTTP server (see HTTP::Server::Simple). You shouldn't call them.

handle_request

AUTHORS

COPYRIGHT

Copyright (c) 2007 Best Practical Solutions, LLC.

LICENSE

You may distribute this module under the same terms as Perl 5.8 itself.