Hide
[E-Mail]
1999/07/23(金) 00:18:35
NT4.0+SP4+Active Perl Build518の環境です。
以下のスクリプトで同ディレクトリ内にあるCSVファイルをオープンできないのですが何が原因なのでしょうか？
$file = "db.csv";
if (!open(IN,"$file")) { &error('Read Error','Please wait for recovery.'); }
@BASE = <IN>;
close(IN);
このスクリプトでは「db.csv」を同じディレクトリにではなく、ドキュメントルートに読みに行こうとします。ドキュメントルートにCSVファイルを置くと動作するからです。
どうすれば、同じディレクトリ内にあるCSVファイルを指定できるのでしょうか？
chdir("/www/cgi-bin");を前の方に置いてみましたがだめです。
また、Apacheで試すと同じディレクトリ内にスクリプトとCSVファイルを置いてきちんと動作するので、CSVファイルの問題ではなさそうです。
NT上Perlの相対パスの書き方に問題があるような気がするのですが、ご指導頂けましたら幸いです。