use strict;
use warnings;
use CGI;
-use CGI::Auth::Hybrid;
+use CGI::Auth::Flexible;
use URI;
my $dump = "$ENV{'CAHTEST_HOME'}/dump";
-my $verifier = CGI::Auth::Hybrid->new_verifier(
- assocdb_path => "$dump/assoc.db",
+my $verifier = CGI::Auth::Flexible->new_verifier(
username_password_ok => sub { my ($c,$r,$u,$p)=@_; return $p eq 'sesame'; },
encrypted_only => 0,
dir => $dump,