Plaggerを入れるまで その2 Feed::Find

インストールエラーになりました、その2。


CPAN Terminal> i Feed::Find
...
riting Makefile for Feed::Find
Running [/usr/local/bin/make test ]...
PERL_DL_NONLAZY=1 /usr/local/bin/perl "-MExtUtils::Command::MM" "-e"
"test_harness(0, 'inc', 'blib/lib', 'blib/arch')" t/00-compile.t t/01-find.t
t/00-compile....ok
t/01-find.......
# Failed test at t/01-find.t line 13.
# got: '0'
# expected: '1'

# Failed test at t/01-find.t line 14.
# got: undef
# expected: 'http://stupidfool.org/perl/feeds/ok.xml'

# Failed test at t/01-find.t line 20.
# got: '0'
# expected: '1'

# Failed test at t/01-find.t line 21.
# got: undef
# expected: 'http://stupidfool.org/perl/feeds/ok.xml'
# Looks like you failed 4 tests of 4.
Dubious, test returned 4 (wstat 1024, 0x400)
Failed 4/4 subtests

Test Summary Report

                                    • -

t/01-find (Wstat: 1024 Tests: 4 Failed: 4)
Failed tests: 1-4
Non-zero exit status: 4
Files=2, Tests=5, 1 wallclock secs ( 0.11 usr 0.04 sys + 1.14 cusr 0.21 csys = 1.50 CPU)
Result: FAIL

...
CPAN Terminal>

makeは通っているのにテストが通らない、、、のでとりあえずtestを読むとなんかWebアクセスっぽいなぁ〜。
Feed/Find.pm の中では LWP::UserAgent を使っているようですが、ざっと読んでproxyの設定を読んでくれるとこがないのですよ〜

うまく行くけど、コノ対処法間違ってる気がする。。。


mkdir ~/lib/perl5/LWP
cp -p /usr/local/lib/perl5/site_perl/5.10.0/LWP/UserAgent.pm ~/lib/perl5/LWP/
vi ~/lib/perl5/LWP/UserAgent.pm
..
#$self->env_proxy if $env_proxy;
$self->env_proxy;# if $env_proxy;
..
LWP::UserAgentが use されたら強制的に env_proxy を読ませまるようにします。

$ export PERL5LIB=~/lib/perl5
$ /usr/local/bin/perl -le 'map{print }@INC;'
/home/handler/lib/perl5
/usr/local/lib/perl5/5.10.0/sun4-solaris-thread-multi
/usr/local/lib/perl5/5.10.0
/usr/local/lib/perl5/site_perl/5.10.0/sun4-solaris-thread-multi
/usr/local/lib/perl5/site_perl/5.10.0
.

ん〜、絶対コレはスマートな方法ではない!?と思いますが、どうしたらよいのでしょうか。。。
人様のモジュールの中で LWP::UserAgentを使っているけど proxy を使ってくれない〜


ちなみに、同じ理由で URI::Fetch もTestでこけます。
どうしたらよい?