in reply to Re: Subroutine evaluated as boolean
in thread Subroutine evaluated as boolean

if ($_->{VALUE} eq $wanted) { return wantarray ? ( $_->{VALUE}, $_->{NAME}, $_->{ADDRESS} ) : 1; }
or
if ($_->{VALUE} eq $wanted) { return wantarray ? @$_{qw( VALUE NAME ADDRESS )} : 1; }