chiark / gitweb /
want http_proxy
authorian <ian>
Wed, 14 Apr 2004 14:03:50 +0000 (14:03 +0000)
committerian <ian>
Wed, 14 Apr 2004 14:03:50 +0000 (14:03 +0000)
farnell/farnell-find

index b31fef2519a0e522f3cb014229eb1d50974277e4..5087eacb8bced3ab96c4f7f00ed19351cf2d5b5a 100755 (executable)
@@ -47,6 +47,7 @@ sub by_item ($) {
     $chr->{Shortcode}= $1.$2;
     $url .= $chr->{Shortcode};
     if (!-f "farn.$itemcode") {
+       die "want http_proxy\n" unless exists $ENV{'http_proxy'};
        system "wget -otmp.farnerr.$itemcode -Otmp.farn.$itemcode $url";
        if ($?) { system "cat tmp.farnerr.$itemcode"; die; }
        rename "tmp.farn.$itemcode", "farn.$itemcode" or die $!;