A simple way to authenticate against your local unix PAM service.
Note that the only service this has been tested against is the 'login' service. Patches and fixes are welcome.
my Bool $login-valid = authenticate('login', 'retupmoca', 'xxxxxx');
sub authenticate( $service, Str $user, Str $pass ) returns Bool
Calls the PAM service $service, and attempts to authenticate using the given $user and $pass. Returns True for success and False for failure.
To build this module, you will need both libpam.so, and it's header files.
You can accomplish this on Debian-based systems with the following command:
sudo apt install libpam-dev