[rt-users] List of privileged users

[Asif Iqbal]

On Fri, Jun 15, 2012 at 5:37 AM, Tim Cutts <tjrc at sanger.ac.uk> wrote:

>
> On 15 Jun 2012, at 07:52, Asif Iqbal wrote:
>
> > 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;
>
> Don't you mean:
>
> use RT::Users;
>
>
right. I took that code from another script without realizing this obvious
change.


> instead of the above two lines?
>
> >
> >  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
>
> $PrivilegedUser is a reference  to a perl object (hence you get the class
> name and an identifier for the object).  In order to get the data out of
> the object, you have to call an accessor method:
>
> print $PrivilegedUser->Name, "\n";
>
>
excellent! thanks a lot!


> or
>
> print $PrivilegedUser->EmailAddress, "\n";
>
> depending on what you want.
>
> >  }
> >
> >  $RT::Handle->Disconnect();
>
> I don't think you need that bit - it'll all be closed cleanly as the
> script exits anyway.
>
> Tim
>
> --
>  The Wellcome Trust Sanger Institute is operated by Genome Research
>  Limited, a charity registered in England with number 1021457 and a
>  company registered in England with number 2742969, whose registered
>  office is 215 Euston Road, London, NW1 2BE.
>



-- 
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/e4ca63e5/attachment.htm>