アプリ版:「スタンプのみでお礼する」機能のリリースについて

Perlで基本認証を済まし、ページを取得する方法がさっぱり分かりません。
できれば抽象的な説明より、プログラムそのまま書いてくれませんか?

A 回答 (2件)

use LWP::UserAgent;


my $ua = LWP::UserAgent->new;
my $req = HTTP::Request->new(GET => '取得するページのURL');
$req->authorization_basic('ユーザー名', 'パスワード');
print $ua->request($req)->as_string;
    • good
    • 0
この回答へのお礼

ありがとうございました。

お礼日時:2005/07/11 06:49

 met000jp さんのされたい事は、BASIC 認証後に Perl(CGI)を使ってユーザ事にページを使い分けたい場合でしょうか。



 そうであれば、環境変数 $ENV{REMOTE_USER} で BASIC 認証で認証させたユーザ名を取得できます。

参考URL:http://x68000.q-e-d.net/~68user/net/http-auth-1. …
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!