PHPやPerlでプロキシを通した接続

もっとうまいタイトルの表現ないかな。
PHP

<?php
$proxy_context = stream_context_create(
	array(
		'http' => array(
			'proxy' => 'tcp://proxy_host:8080',
		),
	)
);

file($url, $flags, $proxy_context);
file_get_contents($url, $flags, $proxy_context);
...

Perl + LWP::UserAgent

require LWP::UserAgent;
 
my $ua = LWP::UserAgent->new;

$ua->env_proxy; # 環境変数 http_proxy, ... から読み込む
$ua->proxy('http', 'http://proxy_host:8080/');