【テストスクリプト2】
use Bio::DB::GenBank;
use Bio::DB::WebDBSeqI;
$gb = new Bio::DB::GenBank;
$httpproxy = $db->proxy(['http'],'http://大学のプロキシ:8080');
$seq = $gb->get_Seq_by_id('MUSIGHBA1');
print $seq;
【WebDBSeqIのpodテキスト】
Title : proxy
Usage : $httpproxy = $db->proxy('http') or
$db->proxy(['http','ftp'], 'http://myproxy' )
Function: Get/Set a proxy for use of proxy
Returns : a string indicating the proxy
Args :
$protocol:an array ref of the protocol(s) to set/get
$proxyurl:url of the proxy to use for the specified protocol
$username:username (if proxy requires authentication)
$password:password (if proxy requires authentication)
お礼
またしても、ありがとうございます。 環境変数の設定はPPMインストーラを使用する際に済ませてありまして、perlでも自動的にプロキシ設定を読み出してくれる・・と期待していたのですが違っていたようです。 しかしながら引き続き試行錯誤した結果、なんとかDBアクセスをすることができました。「$httpproxy=~~」の部分の構文を誤って解釈していたことと、$gbと$dbの2つのオブジェクトが混在していたことが原因のようです。macperlでの挫折や費やした時間を思い出すと涙ぐみそうになりますが、k_o_r_o_c_h_a_nさんのおかげで何とかここまでたどり着けました。ありがとうございました。