# Parse the phonebook. If the unique info is there, client
# already has entry. Check to see if the host has changed.
# If it has changed, modify the entry for that box.
# If the box is not found, add an entry to the phonebook.
my $found=0;
while(){
my $line = $_;
if ( $line =~ /^$box_info/ ){
$found=1;