$t->is($user->screen_name, 'ancailliau', 'getUser() a valid user screen name'); // getUserTimeline() $t->diag('getUserTimeline()'); $tweets = $client->getUserTimeline(); $t->isa_ok($tweets, 'TweetCollection', 'getUserTimeline() retrieves a TweetCollection'); $t->isa_ok($tweets[0], 'Tweet', 'getUserTimeline() retrieves tweets'); $t->is($tweets[0]->user->screen_name, 'n1k0', 'getUserTimeline() a valid collection of tweets'); // isDuplicateStatus() $t->diag('isDuplicateStatus()'); $tweets = $client->getUserTimeline(); $tweet = $tweets[0]; $t->ok($client->isDuplicateStatus("don't understand all this #home bashing", 1), 'isDuplicateStatus() detects duplicate status'); $t->ok(!$client->isDuplicateStatus("gnagnaghn", 1), 'isDuplicateStatus() does not detect fake duplicate status'); // search() $t->diag('search()'); $results = $client->search('foo'); $t->isa_ok($results, 'TweetCollection', 'search() retrieves a TweetCollection'); $t->is($results[0]->text, 'Obama Saturday said North Korea`s nuclear weapon test had been "extraordinarily provocative". "Profoundly dangerous" for Iran to get nukes.', 'search() retrieves first result text okay'); $t->is($results[0]->id, 2065832081, 'search() retrieves first result id okay'); $t->is($results[0]->created_at, "Sun, 07 Jun 2009 16:22:43 +0000", 'search() retrieves first result date okay'); $results = $client->search('anniversaires', array('source' => 'friends')); $t->isa_ok($results, 'TweetCollection', 'search() with friends as source retrieves a TweetCollection'); $t->is(count($results), 1, 'search() retrieves correct number of results'); $t->is($results[0]->user->screen_name, 'franckpaul', 'search() retrieves first result author name okay'); // sendDirectMessage() // unblockUser() // unfollowUser() // updateProfile() // updateProfileColors() // updateStatus() $t->diag('updateStatus()');