print "rjt's uid is $users{rjt}{uid}\n";

local $" = ', '; # List separator
print "jdlev is a member of: @{$users{jdlev}{groups}}.\n";

push @{$users{jdlev}{groups}}, 'sudo'; # jdlev now belongs to sudo as well