$conn->message($pl['from'], $body = "Thanks for sending me \"{$pl['body']}\".", $type = $pl['type']);
     $cmd = explode(' ', $pl['body']);
     if ($cmd[0] == 'quit') {
         $conn->disconnect();
     }
     if ($cmd[0] == 'break') {
         $conn->send("</end>");
     }
     if ($cmd[0] == 'vcard') {
         if (!$cmd[1]) {
             $cmd[1] = $conn->user . '@' . $conn->server;
         }
         // take a note which user requested which vcard
         $vcard_request[$pl['from']] = $cmd[1];
         // request the vcard
         $conn->getVCard($cmd[1]);
     }
     break;
 case 'presence':
     print "Presence: {$pl['from']} [{$pl['show']}] {$pl['status']}\n";
     break;
 case 'session_start':
     print "Session Start\n";
     $conn->getRoster();
     $conn->presence($status = "Cheese!");
     break;
 case 'vcard':
     // check to see who requested this vcard
     $deliver = array_keys($vcard_request, $pl['from']);
     // work through the array to generate a message
     print_r($pl);