in reply to System Level Login

Try User::pwent it should do the trick. Also try getpwent.

Since the perldoc page seems empty, here is an example of getpwent:
($name,$pass,$uid,$gid,$quota,$comment,$gcos,$dir,$shell) = getpwent() +;
Hope that helps.

*G*