• Your recent searches
AddressBook
2 results

 view release on metacpan or  search on metacpan

examples/phonelist.cgi  view on Meta::CPAN 

#!/usr/bin/perl

use AddressBook;
use CGI;

$query = CGI::new();
print $query->header(-charset=>'UTF-8');
print "<html><head>\n";
print "<style type=\"text/css\">\n";
print "td {font-size: 8pt; vertical-align: top}\n";
print "</style>\n";
print "<title>Phone List</title></head><body>\n";

$ldap=AddressBook->new(source => LDAP);
$html=AddressBook->new(source => phonelist,config=>$ldap->{config});

$lines = 0;
print "<table>\n";
print "<tr><td><table>\n";

$ldap->search(filter=>{phonelist => "Yes"});

lib/AddressBook/DB/BBDB.pm  view on Meta::CPAN 

=head2 Data Format

The following is the data layout for a BBDB record.  I have created a
sample record with my own data.  Each field is just separated by a
space.  I have added comments to the right

 ["Henry"                             The first name - a string
 "Laxen"                              The last name - a string
 ("Henry, Enrique")                   Also Known As - comma separated list
 "Elegant Solution"                   Business name - a string
 (["home" 415 789 1159 0]             Phone number field - US style
  ["fax" 415 789 1156 0]              Phone number field - US style
  ["mazatlan" "011-5269-164195"]      Phone number field - International style
 )
 (["mailing" "PMB 141"                Address field - There are 3 fields for
   "524 San Anselmo Ave." ""           for the street address, then one each
   "San Anselmo" "CA" (94960 2614)"     for City, State, and Zip Code
  ]
  ["mazatlan" "Reino de Navarra #757" Address field - Note that there is no
   "Frac. El Cid" ""                   field for Country.  That is unfortunate
   "Mazatlan" "Sinaloa, Mexico"        The zip code field is quoted if its
   ("CP" "82110")                      not an integer
  ]



( run in 0.447 second using v1.01-cache-2.11-cpan-49f99fa48dc )