diff options
| author | dakkar <dakkar@thenautilus.net> | 2021-05-13 14:12:51 +0000 |
|---|---|---|
| committer | dakkar <dakkar@thenautilus.net> | 2021-05-13 14:12:51 +0000 |
| commit | 0bd153aa3369869f40ed2de0ad99dc197658882a (patch) | |
| tree | 1ab4ca287ae19d769859bd77fbc190bb0ce7e575 | |
| parent | get the full text of tweets! (diff) | |
| download | tweet-archive-0bd153aa3369869f40ed2de0ad99dc197658882a.tar.gz tweet-archive-0bd153aa3369869f40ed2de0ad99dc197658882a.tar.bz2 tweet-archive-0bd153aa3369869f40ed2de0ad99dc197658882a.zip | |
only print failed responses on error
| -rw-r--r-- | tweet-archive.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tweet-archive.pl b/tweet-archive.pl index b78540f..6e007d3 100644 --- a/tweet-archive.pl +++ b/tweet-archive.pl @@ -38,6 +38,7 @@ eval { } or do { print "Fail: $@\n"; for my $res (@responses) { + next if $res->is_success; print $res->request->as_string; print $res->as_string; print "\n",'-' x 50,"\n\n"; |