| 記事No | ： 14299 |
| 投稿日 | ： 2015/10/19(Mon) 14:50:41 |
| タイトル | ： JoyfulNote6.02。ファイル添付時のエラー。 |
| ID情報 | ： ozspeed |
| 投稿者 | ： ozs |
| URL | ： http://www.Google.co.jp |
JoyfulNote Ver.6.02
新規投稿、または、返信で、ファイルを添付しようとすると、
以下のエラーが発生します。
【エラーメッセージ】
Software error:
Undefined subroutine CGI::param_filename
at D:\hoge\joyful\regist.cgi line 759.
【regist.cgiのエラー該当行】
759 my $ex = $cgi->param_filename('upfile') =~ /(\.[^\\\/:\.]+)$/ ? $1 : error("拡張子不明");
ファイルを添付しなければ、問題なく新規投稿、返信が行えます。
対応方法等、ご存じの方がいらっしゃいましたら、ご教示のほど、よろしくお願いいたします。
ローカル環境に設置しているため、URLはダミーです。
| 記事No | ： 14300 |
| 投稿日 | ： 2015/10/19(Mon) 18:51:09 |
| タイトル | ： Re: JoyfulNote6.02。ファイル添付時のエラー。 |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
| URL | ： http://shade-search.com/sts/fsw/wiki.cgi |
param_filenameという関数が定義されていないというエラーメッセージが出ていますが、
そのsub param_filename は./lib/CGI/Minimal.pm に書かれています。
./libディレクトリ内のフォルダ、ファイルがすべてアップロードされているか確認してください。
| 記事No | ： 14306 |
| 投稿日 | ： 2015/10/21(Wed) 12:34:59 |
| タイトル | ： Re^2: JoyfulNote6.02。ファイル添付時のエラー。 |
| ID情報 | ： ozspeed |
| 投稿者 | ： ozs |
| URL | ： http://www.Google.co.jp |
ご回答ありがとうございます。
./lib内を確認しましたが、全てアップロードされているようです。
> param_filenameという関数が定義されていないというエラーメッセージが出ていますが、
> そのsub param_filename は./lib/CGI/Minimal.pm に書かれています。
>
> ./libディレクトリ内のフォルダ、ファイルがすべてアップロードされているか確認してください。
| 記事No | ： 14307 |
| 投稿日 | ： 2015/10/21(Wed) 13:15:05 |
| タイトル | ： Re^3: JoyfulNote6.02。ファイル添付時のエラー。 |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
| URL | ： http://shade-search.com/sts/fsw/wiki.cgi |
my $ex = $cgi->param_filename('upfile') =~ /(\.[^\\\/:\.]+)$/ ? $1 : error("拡張子不明");
の行はオリジナルのVer.6.02では、759行目ではありませんが、どこか変更されているのでしょうか。
オリジナルに戻して試してみるとどうでしょう。
| 記事No | ： 14309 |
| 投稿日 | ： 2015/10/22(Thu) 00:46:56 |
| タイトル | ： Re^4: JoyfulNote6.02。ファイル添付時のエラー。 |
| ID情報 | ： ozspeed |
| 投稿者 | ： ozs |
ご回答ありがとうございます。
オリジナルを使うと以下のエラーが出ます。
Software error:
Can't locate ./init.cgi in @INC (@INC contains: ./lib D:/Perl/site/lib D:/Perl/lib .) at D:\hoge\joyful\regist.cgi line 20.
ゆえに、コードの頭に以下を追加しています。
$chdir = $0;
$chdir =~ s/[^\\]*$//;
chdir($chdir);
> my $ex = $cgi->param_filename('upfile') =~ /(\.[^\\\/:\.]+)$/ ? $1 : error("拡張子不明");
>
> の行はオリジナルのVer.6.02では、759行目ではありませんが、どこか変更されているのでしょうか。
> オリジナルに戻して試してみるとどうでしょう。
| 記事No | ： 14311 |
| 投稿日 | ： 2015/10/22(Thu) 12:39:28 |
| タイトル | ： Re^5: JoyfulNote6.02。ファイル添付時のエラー。 |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
| URL | ： http://shade-search.com/sts/fsw/wiki.cgi |
init.cgiが読み込めないというのは問題ですね。
$chdir = $0;
$chdir =~ s/[^\\]*$//;
chdir($chdir);
でなぜ解決するのかもよくわかりません。
通常$0で得られるプログラムのパスは
区切り文字に/が使われていると思うのですが、
上記の記述で解決するということは、区切り文字が\になっているのかもしれません。
エラーメッセージのスクリプトパスも\が使われているようですし。
ローカルサーバーを使用ということですが、
サーバーの設定を見直すべきかもしれません。
| 記事No | ： 14321 |
| 投稿日 | ： 2015/10/23(Fri) 00:30:58 |
| タイトル | ： Re^6: JoyfulNote6.02。ファイル添付時のエラー。 |
| ID情報 | ： ozspeed |
| 投稿者 | ： ozs |
ご回答ありがとうございます。
根本的に見直してみます。
> init.cgiが読み込めないというのは問題ですね。
>
> $chdir = $0;
> $chdir =~ s/[^\\]*$//;
> chdir($chdir);
>
> でなぜ解決するのかもよくわかりません。
> 通常$0で得られるプログラムのパスは
> 区切り文字に/が使われていると思うのですが、
> 上記の記述で解決するということは、区切り文字が\になっているのかもしれません。
>
> エラーメッセージのスクリプトパスも\が使われているようですし。
> ローカルサーバーを使用ということですが、
> サーバーの設定を見直すべきかもしれません。