]>
git.proxmox.com Git - pve-access-control.git/blob - src/test/auth-test.pl
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";