commit 53d2a012a4b8ed49e54e6dc3a7c6d0551809581f
parent 3e441fee77f5fa1e97a7f6ad180e5330ed27620f
Author: Kyle Milz <kyle@getaddrinfo.net>
Date: Thu, 12 Mar 2015 01:25:05 -0600
PriceChart: print get_dom instead of GET
Diffstat:
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/PriceChart.pm b/PriceChart.pm
@@ -77,11 +77,11 @@ sub get_dom
my $resp = $ua->get($url);
if ($resp->is_success) {
my $short_url = trunc_line($url, length($resp->status_line) + 11, 1);
- print "info: GET " . $resp->status_line . " $short_url\n" if ($verbose);
+ print "info: get_dom: " . $resp->status_line . " $short_url\n" if ($verbose);
return HTML::Grabber->new(html => $resp->decoded_content);
}
- print "error: GET $url failed\n";
+ print "error: get_dom: $url failed\n";
print "error: " . $resp->status_line . "\n";
return undef;
}