DOKK / manpages / debian 13 / krb5-wallet-server / Wallet::ACL::Krb5::Regex.3pm.en
Wallet::ACL::Krb5::Regex(3pm) User Contributed Perl Documentation Wallet::ACL::Krb5::Regex(3pm)

Wallet::ACL::Krb5::Regex - Regex wallet ACL verifier for Kerberos principals

    my $verifier = Wallet::ACL::Krb5::Regex->new;
    my $status = $verifier->check ($principal, $acl);
    if (not defined $status) {
        die "Something failed: ", $verifier->error, "\n";
    } elsif ($status) {
        print "Access granted\n";
    } else {
        print "Access denied\n";
    }

Wallet::ACL::Krb5::Regex is the wallet ACL verifier used to verify ACL lines of type "krb5-regex". The value of such an ACL is a Perl regular expression, and the ACL grants access to a given Kerberos principal if and only if the regular expression matches that principal.

Creates a new ACL verifier. For this verifier, there is no setup work.
Returns true if the Perl regular expression specified by the ACL matches the PRINCIPAL, false if not, and undef on an error (see "DIAGNOSTICS" below).
Returns the error if check() returned undef.

The ACL parameter to check() was a malformed Perl regular expression.
The PRINCIPAL parameter to check() was undefined or the empty string.
The ACL parameter to check() was undefined or the empty string.

Wallet::ACL(3), Wallet::ACL::Base(3), Wallet::ACL::Krb5(3), wallet-backend(8)

This module is part of the wallet system. The current version is available from <https://www.eyrie.org/~eagle/software/wallet/>.

Ian Durkacz

2024-11-12 perl v5.40.0