in reply to (Mis)Understanding grep...eq $_
To reiterate what ysth is saying...
unless ( grep $person_has eq $_, $item ) { ... }
is identical to:
unless ( $person_has eq $item ) { ... }
except that it is slower and harder to read.
regards,
In Section
Seekers of Perl Wisdom