There might be more than one way to do it, but do it this way!
My way was a lot more complicated.
> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Sent: Friday, September 01, 2000 11:06 AM
> To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
> Subject: Re: Quadword conversion of UIC in VMS::User
>
>
> [EMAIL PROTECTED] wrote on Fri, 01 Sep 2000 08:06:19 -0600 in
> <[EMAIL PROTECTED]>:
>
> > use VMS::User;
> >
> > $UserName = "DALEW"
> > $uairef = VMS::User:user_info($UserName);
> > $uic = $uairef->{UIC};
> > print "UIC ==> ",$uic,"\n";
> >
> >
> > My uic is [5,6], and this code returns:
> > UIC ==> 327686
> >
> > I want it to display the [5,6]
>
> printf( "UIC ==> [%o,%o]\n", $uic/65536, $uic % 65536);
>
> Ed James [EMAIL PROTECTED]
> TeleCommunications Systems, Inc. voice 410-295-1919
> 2024 West Street, Suite 300 fax 410-280-1094
> Annapolis, MD 21401-3556
>
