}
print "): " . $myCountry->Name() . "]\n";
# output remaining country properties
print "Is a SEPA member? ";
if ($myCountry->IsSEPA()) {
print "Yes";
} else {
print "No";
}
print ".\n";
# central bank
print "Central Bank: ";
$central_bank_name = $myCountry->CentralBankName();
if ($central_bank_name != '') {
print $central_bank_name;
$central_bank_url = $myCountry->CentralBankURL();
if ($central_bank_url != '') {
print " ({$central_bank_url})";
}
} else {
print "None.";
}
print "\n";
# parent_registrar
print "Has own team of bureaucrats? ";
$parent_registrar = $myCountry->ParentRegistrar();
if ($parent_registrar != '') {
print "No (outsources to the wise experts of '" . $parent_registrar . "')\n";
} else {
print "Yes.\n";
}