my $country = do {
    my $c = $card->country();
    ($c and $c ne 'gbr') ? uc "[$c]" : '';
};