Changeset 348
- Timestamp:
- 04/20/08 04:09:02 (7 months ago)
- Files:
-
- 1 modified
-
trunk/tutorial/tweetsearch/tweet_poller.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tutorial/tweetsearch/tweet_poller.pl
r345 r348 95 95 my $since_id = ""; 96 96 my $count = 0; 97 my $error = 0; 97 98 my $ua = LWP::UserAgent->new; 98 99 $ua->timeout(10); … … 121 122 $since_id = $tweet->{id}; 122 123 }; if($@){ 123 #warn(Dumper($tweet)); 124 $error++ 124 125 } 125 126 } 126 127 127 print STDERR "Loaded $count \r";128 print STDERR "Loaded $count, Exception $error\r"; 128 129 } 129 130 }
