AddressBook

 view release on metacpan or  search on metacpan

examples/ldap-abook.conf  view on Meta::CPAN

      <db type="LDIF" name="postalCode" />
      <db type="PDB" name="Zip Code" />
    </field>
    <field name="country" order="14" type="text">
      <db type="Text" name="Country" />
      <db type="abookentry" name="Country" />
      <db type="LDAP" name="country" />
      <db type="LDIF" name="country" />
      <db type="PDB" name="Country" />
    </field>
    <field name="birthdate" order="16" type="date">
      <db type="Text" name="Birth Date" />
      <db type="abookentry" name="Birth Date" />
      <db type="LDAP" name="birthDate" />
      <db type="LDIF" name="birthDate" />
      <db type="PDB" name="Birthdate" />
    </field>
    <field name="phonelist" order="17" non_multiple="yes" type="boolean" >
      <db type="Text" name="On Phone List" />
      <db type="abookentry" name="On Phone List" default="No" />
      <db type="LDAP" name="phonelist" />
      <db type="LDIF" name="phonelist" />
    </field>
    <field name="samelastname" order="18" type="boolean" non_multiple="yes" >
      <db type="Text" name="Same Last Name" />
      <db type="abookentry" name="Same Last Name" default="Yes" />
      <db type="LDAP" name="samelastname" />
      <db type="LDIF" name="samelastname" />
    </field>
    <field name="category" order="19" type="select" non_multiple="yes" values="personal,contacts">
      <db type="Text" name="category"/>
      <db type="abookentry" name="category" size="2"/>
      <db type="LDAP" name="category" />
      <db type="LDIF" name="category" />
      <db type="abooksearch" name="Category" />
      <db type="PDB" name="category" />
    </field>
  </fields>
  <databases>
    <abooksearch
            driver="HTML"
    />
    <abookentry
            driver="HTML"
    />
    <abooknew
            driver="HTML"
    />
    <phonelist
            driver="HTML"
            write_format="Tr(td([$fullname . ($description ? &quot; ($description)&quot; : ''),
	                     table(Tr([map{($attributes{$_}) ? td([$_,$attributes{$_}]) : '' } ('Home','Work','Pager','Mobile') ]))]))"
  	    intra_attr_sep="&lt;br&gt;" 
    />
    <LDAP 
            objectclass="abookPerson" 
	    hostname="localhost"
            base="o=abook" 
	    dn_calculate="'cn='.$cn"
	    username="cn=Manager,o=abook"
	    password="secret"
            key_fields = "cn"
    />
    <PDB
            phone_display = "($category eq 'personal') ? 'Home,Work,E-mail' : 'Work,Home,E-mail'"
            key_fields = "Name,First name"
	    port="/dev/pilot"
  />
  </databases>
</AddressBook_config>



( run in 0.643 second using v1.01-cache-2.11-cpan-39bf76dae61 )