access-check-manager.cgi.in

#!/usr/bin/perl

use strict;
use warnings;
use utf8;
use lib qw(@modulesdir@);

use Config::Tiny;

use AccountManager::App;

my $configuration_file =
    $ENV{ACCOUNTMANAGER_CONFIG} || '@confdir@/manager.conf';
my $configuration = Config::Tiny->read($configuration_file);
if (!$configuration) {
    die Config::Tiny->errstr() . "\n";
}

my $app = AccountManager::App->new(
    configuration => $configuration
);
$app->run();

__END__

=head1 NAME

account-manager-web.pl - Web interface for the Test IdP Account Manager