http://www.perlmonks.org?node_id=621773


in reply to How Much Is Too Much (on one line of code)?

I don't mind the ternary, but including the postfix is excessive in my opinion. I'd prefer this:
my %ignore = ( gbc => 1); my $country = $card->country; if ($country) { $country = $ignore{$country} ? '' : uc($country); } print $country;