[rt-users] List of privileged users

Asif Iqbal vadud3 at gmail.com
Fri Jun 15 02:52:22 EDT 2012


How do I get the list of privleged users?

This is what I have so far

#!/usr/bin/perl -w

 use strict;
 use Carp;
 use Getopt::Long;

 use lib qw(/opt/rt3/lib /opt/rt3/etc);

 use RT::Interface::CLI qw(CleanEnv GetCurrentUser GetMessageContent loc);
 CleanEnv();

 use RT;
 use RT::Ticket;
 use RT::Tickets;

 RT::LoadConfig();

 RT::Init();

 my $PrivilegedUsers = RT::Users->new ( $RT::SystemUser );
 $PrivilegedUsers->LimitToPrivileged;


 while ( my $PrivilegedUser = $PrivilegedUsers->Next ) {
        print $PrivilegedUser."\n";  # <== this only prints hash
 }

 $RT::Handle->Disconnect();


Asif Iqbal
PGP Key: 0xE62693C5 KeyServer: pgp.mit.edu
A: Because it messes up the order in which people normally read text.
Q: Why is top-posting such a bad thing?
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.bestpractical.com/pipermail/rt-users/attachments/20120615/81e21f8b/attachment.htm>


More information about the rt-users mailing list