4 getUserEntryForName "mattson" >>= \ mattson ->
5 getUserEntryForName "partain" >>= \ partain ->
6 putStr (ue2String mattson) >>
8 putStr (ue2String partain) >>
10 getUserEntryForID (userID mattson) >>= \ muid ->
11 getUserEntryForID (userID partain) >>= \ puid ->
12 putStr (ue2String muid) >>
14 putStr (ue2String puid) >>
18 name ++ (':' : (show uid) ++ (':' : (show gid) ++ (':' : home ++ (':' : shell))))
23 home = homeDirectory ue