]>
git.proxmox.com Git - pve-access-control.git/blob - test/auth-test.pl
60429a98c36daf348a046c8a84f637fbbd366c97
5 use PVE
::AccessControl
;
8 die "Username missing" if !$username;
10 my $password = PVE
::PTY
::read_password
('password: ');
11 PVE
::AccessControl
::authenticate_user
($username,$password);
13 print "Authentication Successful!!\n";