package DistroPrsRlsAuth; use base 'CGI::Application'; sub cgiapp_prerun { my $self = shift; # add run-level specific authorization checks here return; } 1;