 ImoCheckerの解説
サンプルとして、symlink、times、flockを試しています。これらは、OSに依存しているものでサーバーのOSによって(perlの種類によっても変わる場合があります)使えるときと使えないときがあります。それらをチェックするためです。
以下に使用できない可能性のあるリストを一部載せておきます。これらはインターネットでしらべるとでてくるものです。
alarm(), chroot(), fork(), getpgrp(), getppid(), getpriority(),
getpwnam(), getgrnam(), getpwuid(), getgrgid(), getpwent(),
getgrent(), setpwent(), setgrent(), endpwent(), endgrent(), kill(),
link(), msgctl(), msgget(), msgrcv(), msgsnd(), semctl(), semget(),
semop(), setpgrp(), setpriority(), shmctl(), shmget(), shmread(),
shmwrite(), symlink(), syscall(), times(), wait(), waitpid(),
getnetbyname(), getnetbyaddr(), getnetent(), getprotoent(),
getservent(), sethostent(), setnetent(), setprotoent(), setservent(),
endhostent(), endnetent(), endprotoent(), endservent(), socketpair()
不完全なので使えると判断してしまうが実際おかしいのは
mkdir、stat(理由、Win32ではパーミションという概念がないため)などなど
参考ページ：「perlwin32 - Win32におけるPerl - BUGS AND CAVEATS」
ImoCheckerの入手
LZH形式の圧縮ファイルをダウンロードしてください。
[LZH形式 v0.8]
ダウンロードできたら解凍してください。以下のファイルができます。
imochecker.cgi
設置方法
 | | | | public_html cgi-bin |
 | | | | imochecker |
 | |  | | imochecker.cgi[755] |
|
imochecker.cgiをエディタで開き以下の部分を修正してください。
#!/usr/local/bin/perl
プロバイダで定められたPerlへのパスを指定してください
|
ファイルの転送
スクリプトファイル及びログファイルは「テキストモード」で転送してください。
アクセス権については
| ファイル名 | アクセス権(パーミション) |
| imochecker.cgi | 755 |
ImoCheckerの変更方法
形式は
# (*1)チェック
$@ = '';
$imo_data = '(*1)';
print_out (eval { (*2); 1; });
です。(*1)にはチェックするものの名前。(*2)はそれに合ったコードをかくだけです(複数行でも可能)。
|
