Re: hash parameter question

[chas]

I'm not familiar with User::pwent. However, your find_deletion_candidates sub doesn't make much sense to me. The keys of %users are usernames , so what are %user and $user{uname}?
(Update: I guess you got several answers while I was looking at your code...)

[ikegami]

That's exactly what's wrong
my %user=$_;
should be
my %user=%$_;
because $_ contains a *reference* to the nested hash. The fact that a scalar is being assigned to a hash is a sure sign something is wonky.

[jarich]

Nope. $_ contains a string. A key from %users; which is presumably a username. Your suggestion will therefore not work.

Had PerlHeathen written:

foreach(values %users) {
      my %user=$_;
      my $pw=getpwnam($user{uname});
      my $homedir=$pw->dir;
}

(note the use of values) then $_ would be a reference to a hash and then your solution would make the code work.

For example:

foreach(values %users) {
      my %user=%$_;
      my $pw=getpwnam($user{uname});
      my $homedir=$pw->dir;
}

It is likely that this is what PerlHeathen was trying to write in the first place.

jarich

[PerlHeathen]

Thank you all. This is what I was looking for; I need both suggestions -- pass by reference & use values(%users) instead.

thanks again!