subtype USZipCodeC 
      => as Value
      => where {
            $_ =~ /(?-xism:^(?:(?:(?:USA?)-){0,1}(?:(?:(?:[0-9]{3})(?:[0-9]{2}))(?:(?:-)(?:(?:[0-9]{2})(?:[0-9]{2}))){0,1}))$)/;         
      };

has 'zip_code' => (is => 'rw', isa => 'USZipCodeC');