$object->countries;     
use Data::Dumper;
print Dumper $object->countries;