Select Code to Download

sub access_check
  {
...

    return $quick_allow{ $user_id };
  }

my %ALL_USER_GROUPS = (
                    23 => [ qw( g1  g4 ) ],
                    13 => [ qw( g3  g5 ) ],
                    );