die("Invalid number of twitter accounts");
    }
    if ($person->web_addresses[0]->getUrl() != "http://john.wordpress.com" || $person->web_addresses[0]->getLocation() != "Personal") {
        die("Invalid Personal Web Address");
    }
    if ($person->web_addresses[1]->getUrl() != "http://corporation.com/~john" || $person->web_addresses[1]->getLocation() != "Work") {
        die("Invalid Work Web Address");
    }
    // Delete Person
    $person->delete();
}
$people = $hr->findPeopleBySearchTerm("John Test Doe");
print count($people) . " matched search term John Test after deletion.\n";
die;
$person = $hr->findPersonByID(64751412);
print "Find By Title\n\n";
$people = $hr->findPeopleByTitle("Test CEO");
print_r($people);
print "Find By Company ID\n\n";
$people = $hr->findPeopleByCompanyId(64755398);
print_r($people);
print "Find By Search Term\n\n";
$people = $hr->findPeopleBySearchTerm("Test");
print_r($people);
print "Find By Search Criteria\n\n";
$people = $hr->findPeopleBySearchCriteria(array("email" => "*****@*****.**", "phone" => "111-111-1111"));
print_r($people);
// Update Person
$person->setLastName("Person Test");
$person->setBackground("We are overriding the background here");
$person->save();