GDモジュールについて

質問

GDモジュールの中に、「newFromJpegData」がありますが、
使用例：
$src_img1 = GD::Image->newFromJpegData($fdata)

うまくいきません。何が、おかしいのか、教えてくだされば。

$fdataの中身は、
# if (open(OUT, ">d040805.jpg")) {
# binmode($fdata);
# print OUT $fdata;
# close(OUT);
# }
とやれば、jpegファイルになります。

回答No.1

zebedeer

>うまくいきません。何が、おかしいのか、教えてくだされば。

どううまくいかないんでしょうか？何を、やったのか、教えてくだされば。

># if (open(OUT, ">d040805.jpg")) {
># binmode($fdata);
># print OUT $fdata;
># close(OUT);
># }

コードが無茶なのは即興だから？

$src_img1 = GD::Image->newFromJpegData('d040805.jpg');
print $src_img1->jpeg ();
の出力結果が正しいjpegになってる？
（うちGD入ってないんで確認できんけど）

参考URL：

http://member.nifty.ne.jp/hippo2000/perltips/GD.html

お礼

実は、クライアントからアップロードされたデータを
GD::Image->newFromJpegData
で、取り込もうとしたわけです。
一旦、サーバ上のディスクに保存後のｊｐｇファイルでしたらうまくいくようです。