Re: Re: assigning to a hash via split

[japhy]

Ooh, good catch. You get a ++ from me, and I offer this in reply:

sub buildUserHash {
  use User::pwent;
  my %users;
  while (my $obj = getpwent) { $users{$obj->name} = $obj }
  return \%users;
}

Now, you have a hash of User::pwent objects.

japhy -- Perl and Regex Hacker