画像アップ時のローカル側での画像表示に関して

質問

始めましてよろしくお願いします
画像をアップロードする、スクルプトをperlで書いて、より実用的な機能を
肉付けしている所です、一般のアプリケーションに見うけられる、ローカル側の画像
のファイル名を選択したら画像も一緒に表示される機能がありますがperlでも
同様な機能が実装出来ますでしょうか、もし出来るようであれば参考
になるHPや基本的なスクリプトを教えて頂ければ幸いです。

回答No.1

LancerVII · ベストアンサー

こんにちは。

アップロードする画像をローカルファイルから選択した際に、
画像を表示したいということですと、perlでは行えません。

perlはサーバ上で機能する為、ローカルでの動作には介入できません。

実現するにはJavaScriptを使用することになります。

例えばですが・・・

<input type="file" name="img1">というファイル選択があった場合

<input type="file" name="img1" onChange="loadImage(this.value)">
として、画像の表示する部分を追加します。
<img src="透明GIF等" name="img" alt="選択画像">

function loadImage ( value ) {
document.img.src = value;
}

を用意します。

すると、ファイル選択を行った際にファイルパスがテキストフィールドに入ると思います。
そこで、onChangeが内容の変化を読み取り、loadImageを、自分のフィールド内容で呼び出します。

すると呼び出されたloadImageが最初は透明の画像が表示されている部分を
ファイル参照されたパスで画像を切り替えます。
そうすることにより、今選択した画像が表示されます。

（実際には、画像ファイルでないと画像切り替えをしない等の制御を入れないと不都合が出ると思います。）

的を得ていなかったらごめんなさい。

お礼

LancerVIIさん、どうも的を得た解答ありがとうございます
大変よく分かりました、今私が書いているperlのスクリプトでは、
画像ファイルをサーバーにアップロードできる機能しか無いので、エラー処理や重複ファイルのチェック等
をする部分を完成させてから臨んで行きたいと思います。