# get a location, e.g., from a SeqFeature $location = $feature->location(); # examine its coordinate computation policy print "Location of feature ", $feature->primary_tag(), " employs a ", ref($location->coordinate_policy()), " instance for coordinate computation\n"; # change the policy, e.g. because the user chose to do so