1 %# $Id: sru-auth.html,v 1.1 2007-08-21 09:48:41 mike Exp $
3 In order to test the authentication feature of Simple2ZOOM, we
4 need an authenticator script, accessible via HTTP. The
5 simplest way to provide that is as a simple bit of HTML::Mason
6 running under the conveniently available IRSpy distribution.
7 Since this is only for testing, a hardwired user register is
22 if (defined $user && defined $pass && $register{$user} eq $pass) {
27 $m->abort(401); # "Authorization Required"