10. AccuRev Triggers : ‘Administrative Users’ in Trigger Scripts

‘Administrative Users’ in Trigger Scripts
The sample Perl trigger scripts supplied by AccuRev provide a very simple implementation of the “administrative user” concept: a user is permitted to perform certain operations only if his username is recorded in the administrator hash defined in the script:
$administrator{"derek"} = 1;
$administrator{"allison"} = 1;
if ( ! defined($administrator{$principal}) ) {
print TIO "Execution of '$command' command disallowed:\n";

Micro Focus