CGI/Perlで作成したプログラムがありまして、今回、ホスティング先

質問

CGI/Perlで作成したプログラムがありまして、今回、ホスティング先をLINUXサーバからWindowsサーバに移行に伴い、テストを実施しているのですが、ファイルオープンがうまくいきません。

open(IN,">temp1.txt") || &error("Can't open $file");
と記述するファイルオープンエラーになります。
open(IN,"temp1.txt") || &error("Can't open $file")
と記述するとOKになります。

何か、ファイルの更新権限で引っかかっているように見えるのですが、UNIX系と違って、Windowsのフォルダーにはパーミッションの設定はないものと思っており、どうしてよいか判りません。
詳しい方でアドバイスいただけると助かります。

回答No.2

ORUKA1951 · ベストアンサー

＞open(IN,">temp1.txt") || &error("Can't open $file");
　上書き専用モードで開くと、だめだが入力用で開くと開けるということですね。
INというファイルハンドルをつけているということは、
open(IN,">temp1.txt");
とちょっと変・・ではあるけど、IN だろうがOUTだろうがファイルハンドルにすぎないのでかまいませんが、

他のオプションでは？

open IN,"textA.txt" or die "open IN 失敗 :$!";
open OUT,"textB.txt" or die "open OUT 失敗 :$!";
while($input = <IN>){
print OUT $input;
}
close IN;
close OUT;

をためしてみ。

お礼

情報ありがとうございます。ホスティング提供者のツールで、UNIXのパーミッション相当を設定するものが見つかりまして、そのツールでR権限を該当フォルダーに付与したところ、動くようになりました。
ありがとうございました。

回答No.1

seastar3

ウインドウズビスタ以降では、フォルダのプロパティに[セキュリティ]タブがあります。
そのフォルダごとに利用者および利用グループの権限が細かく設定できるようになっているので、Administratorまたはuserまたはeveryoneまたは管理者グループまたは利用グループに権限設定し再起動して動作を確かめていくと動くかもしれません。

また質問内容中の">temp1.txt"の部分はリダイレクト操作に見えますが、フォルダの指定のつもりなのかもしれないと考えました。つまり、フォルダの指定だったら、"./temp1.txt"が目的のファイル位置指定になります。

お礼

情報ありがとうございます。ホスティング提供者のツールで、UNIXのパーミッション相当を設定するものが見つかりまして、そのツールでR権限を該当フォルダーに付与したところ、動くようになりました。
ありがとうございました。