Changeset 17649 for trunk/DataStore/scripts/dsleech
- Timestamp:
- May 12, 2008, 5:12:52 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/DataStore/scripts/dsleech (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/DataStore/scripts/dsleech
r17637 r17649 3 3 # Copyright (C) 2006-2008 Joshua Hoblitt 4 4 # 5 # $Id: dsleech,v 1.1 0 2008-05-12 22:04:53jhoblitt Exp $5 # $Id: dsleech,v 1.11 2008-05-13 03:12:52 jhoblitt Exp $ 6 6 7 7 use strict; … … 67 67 ); 68 68 69 unless (defined $response->is_success) { 70 die "request failed: ", $response->status_line; 69 unless (defined $response or $response->is_success) { 70 warn "request failed: ", $response->status_line; 71 exit($response->code - 300); 71 72 } 72 73
Note:
See TracChangeset
for help on using the changeset viewer.
