Test::OpenID::Server - setup a simulated OpenID server
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.
Create a new test OpenID server
Test whether the server started, and if it did, return the URL it's at.
These methods implement the HTTP server (see HTTP::Server::Simple). You shouldn't call them.
Copyright (c) 2007 Best Practical Solutions, LLC.
You may distribute this module under the same terms as Perl 5.8 itself.