--- espi.cgi	2007/04/15 22:45:14	1
+++ espi.cgi	2007/04/15 23:10:09	2
@@ -9,6 +9,10 @@
 
 $| = 1;
 
+my $admins = {
+	'dpavlin' => 'my admin secret',
+};
+
 my $espi_hook = {
 #	'authenticate-user' => 'ACCESS GRANTED ADMIN',
 #	'authenticate-user' => 'ACCESS GRANTED',
@@ -16,7 +20,7 @@
 		my $param = shift;
 		warn "param = ",dump( $param );
 		my $ret = 'ACCESS GRANTED';
-#		$ret .= ' ADMIN';
+		$ret .= ' ADMIN' if defined( $admins->{ $param->{uid} } ) && $admins->{ $param->{uid} } eq $param->{pwd};
 		return $ret;
 	}
 };