The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<update>
  <domain:update xmlns:domain="urn:ietf:params:xml:ns:domain-1.0">
    <domain:name>[% domain %]</domain:name>
    [%~ IF owner %] 
    <domain:chg>
      <domain:registrant>[% owner %]</domain:registrant>
    </domain:chg>
    [%~ END %]
    [%~ IF admin %] 
    <domain:add>
      <domain:contact type="admin">[% admin %]</domain:registrant>
    </domain:add>
    <domain:rem>
      <domain:contact type="admin">[% admin_old %]</domain:registrant>
    </domain:rem>
    [%~ END %]
    [%~ IF tech %] 
    <domain:add>
      <domain:contact type="tech">[% tech %]</domain:registrant>
    </domain:add>
    <domain:rem>
      <domain:contact type="tech">[% tech_old %]</domain:registrant>
    </domain:rem>
    [%~ END %]
    [%~ IF ns %]
    <domain:chg>
      <domain:ns>
        [%~ FOREACH dns in ns %]
        <domain:hostAttr>
          <domain:hostName>[% dns %]</domain:hostName>
        </domain:hostAttr>
        [%~ END %]
      </domain:ns>
    </domain:chg>
    [%~ END %]
  </domain:update>
</update>