my $verifier = CGI::Auth::Hybrid->new_verifier(
assocdb_path => "$dump/assoc.db",
username_password_ok => sub { my ($c,$r,$u,$p)=@_; return $p eq 'sesame'; },
my $verifier = CGI::Auth::Hybrid->new_verifier(
assocdb_path => "$dump/assoc.db",
username_password_ok => sub { my ($c,$r,$u,$p)=@_; return $p eq 'sesame'; },