diff --git a/lib/sites/mixcloud.pm b/lib/sites/mixcloud.pm index a34c30501a350ae1dacfe3276afe1eed28dce83d..5d4d21a40f11f991ba4bc36160d45422bfe213ef 100644 --- a/lib/sites/mixcloud.pm +++ b/lib/sites/mixcloud.pm @@ -9,7 +9,10 @@ sub get { $url =~ s/www/api/; my %infos; - my $ua = LWP::UserAgent->new(timeout => 30); + my $ua = LWP::UserAgent->new( + timeout => 30, + env_proxy => 1, + ); my $response = $ua->get($url); die($response->status_line) unless ($response->is_success); diff --git a/lib/sites/youtube.pm b/lib/sites/youtube.pm index e0901f9793e27f50d2a4868ab155eb3bb24861bf..6104baac5de5e6c716c6aa4787baf76b9c079b7c 100644 --- a/lib/sites/youtube.pm +++ b/lib/sites/youtube.pm @@ -18,7 +18,10 @@ BEGIN { sub get { my $id = shift; - my $ua = LWP::UserAgent->new(timeout => 30); + my $ua = LWP::UserAgent->new( + timeout => 30, + env_proxy => 1, + ); my $response = $ua->get($endpoint .'/videos?id='.$id .'&key='.$conf->{'youtube_api_key'} diff --git a/lib/sites/zippy.pm b/lib/sites/zippy.pm index 5bb553f16793585c08971cf5ad296308742d75e3..fc77b4058455dfa0a6b16ed269f5fe979c22e969 100644 --- a/lib/sites/zippy.pm +++ b/lib/sites/zippy.pm @@ -13,8 +13,9 @@ sub get { my ($url) = @_; my $ua = LWP::UserAgent->new( - agent => "Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.13) Gecko/20101203 Firefox/3.6.13 GTB7.1", - timeout => 30 + agent => "Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.13) Gecko/20101203 Firefox/3.6.13 GTB7.1", + timeout => 30, + env_proxy => 1, ); my $response = $ua->get($url);