レンタルサーバーでWWW::Mechanize使う方法

質問

ka○○yaレンタルサーバーのスタンダードプランでは、WWW::Mechanizeがインストールされていないので、
サポートに問い合わせしたところ

> 動作保証、検証、サポートを行っておりませんがお客様にてモジュール
> をサーバーにアップロード頂いて設定を頂くことで動作が可能である場合がござ
> います。

とのことです。
Telnetが使えない環境でモジュールをアップロードして使う方法をご教授して頂けないでしょうか？

回答No.1

11th_style · ベストアンサー

下記の方法で動くかもしれないし、動かないかもしれません。依存関係が深い可能性があるので、その場合は必要なモジュールを随時足して行く必要があります。

=========================

参考URLからソースを落として、lib/以下を CGIから見える位置に置いて下さい。以下のようなファイル配置が一例です。

XXXX.cgi
lib/WWW/Mechanize.pm
lib/WWW/Mechanize
(以下略)

このディレクトリをCGIのインクルードPATHに居れる必要があるので、

use lib qw(./lib);
use WWW::Mechanize;

などとすればよいでしょう。

参考URL：

http://search.cpan.org/~petdance/WWW-Mechanize-1.14/

お礼

11th_styleさん、回答ありがとうございます。
ご教授して頂いた通りにファイルをアップロードしてみたところ、WWW::Mechanizeは動きました。
ありがとうございました。

＊＊＊＊＊＊＊＊test cgi＊＊＊＊＊＊＊＊
#!/usr/bin/perl
use lib qw(/home/meikenpochi/lib/);
use WWW::Mechanize;

my $url = "http://www.yahoo.co.jp/index.html";
my $mech = WWW::Mechanize->new( cookie_jar => undef );
my $response = $mech->get( $url );
print "Content-type: text/html;\n\n";
foreach my $form ($mech->forms) {
foreach my $input ($form->inputs) {
printf("%s (%s) ... %s\n", $input->name, $input->type, $input->value);
}
}

＊＊＊＊＊＊＊＊結果＊＊＊＊＊＊＊

p (text) ... fr (hidden) ... top src (hidden) ... top search (image) ... dsearch (image) ... sp (option) ... 2 aracd (option) ... 02 (submit) ... 検索