} } 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"; } # official currency print "Official currency: "; $official_currency = $myCountry->CurrencyISO4217(); if ($official_currency == '') { print "None."; } else { print $official_currency; } print "\n"; # get example iban $myIban = new IBAN($myCountry->IBANExample()); # output example iban properties one by one print "Example IBAN: " . $myIban->HumanFormat() . "\n"; print " - country " . $myIban->Country() . "\n"; print " - checksum " . $myIban->Checksum() . "\n"; print " - bban " . $myIban->BBAN() . "\n"; print " - bank " . $myIban->Bank() . "\n"; print " - branch " . $myIban->Branch() . "\n";