I don’t think it need to be re-written. To avoid confusion, I'd like to put two parenthesis and rewrite the code as

my $country = $card->country;    
$country = (( $country eq 'gbr' ) ? '' : uc "[$country]" )if $country;
[download]

rgds
VC
------
If you treat every situation as a life-and-death matter,
you'll die a lot of times.
~Dean Smith~