... map { chomp; [split'=']; } <$fh>;

##</code><code>##

%{$self->{info}} = map { EXPR } map { chomp; [split'=']; } <$fh>;

##</code><code>##

    defined $_->[1] ? @$_ : ()

##</code><code>##

    $_->[1] //= q{undef}; @$_