print "UID is: $IDINFO[2] \n"; print "GID is: $IDINFO[3] \n";