You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
24 lines
408 B
24 lines
408 B
4 years ago
|
package My;
|
||
|
|
|
||
|
|
sub accessToTrace {
|
||
|
|
my $hash = shift;
|
||
|
|
my $custom = $hash->{custom};
|
||
|
|
my $req = $hash->{req};
|
||
|
|
my $vhost = $hash->{vhost};
|
||
|
|
my $params = $hash->{params};
|
||
|
|
my $session = $hash->{session};
|
||
|
|
|
||
|
|
return
|
||
|
|
"$custom alias $params->[0]_$params->[1]:$session->{groups} by using $session->{ $params->[2] }";
|
||
|
|
}
|
||
|
|
|
||
|
|
sub return0 {
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
sub return1 {
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
1;
|