カスタム検索
     |
Created: 27 July 2008
取得の例
BASIC認証でログインしたときのユーザ名は、"$ENV{REMOTE_USER}"で取得できます。
以下を、BASIC認証が設定されたディレクトリに置けば、開いたときにユーザ名が取得されて表示されます。
#!/usr/bin/perl
use strict;
print "Content-type: text/html; charset=Shift_JIS\n\n";
print <<EOM;
<html>
<body>
<p>Login user: $ENV{REMOTE_USER}</p>
</body>
</html>
EOM
exit;
 |