s4081回答ポイント 70ptウォッチ
1142649748

Web Arena Suite2というレンタルサーバーを使ってCGIで画像サムネイル作成で困っています

perlで作ったのですが画像処理が途中で終わってしまう時があります
幅が1500ピクセルで700k以内の画像なら処理できるのですがそれを超えると途中から真っ黒の画像になってしまいます
なぜなのでしょう?
以下スクリプトです
#!/usr/local/bin/perl
print "Content-type:text/html\n\n";

use Image::Magick;
use Image::Size;

my $file = "image.jpg";
my $image = Image::Magick->new;
$image->Read($file);
my ($width, $height) = $image->Get('width', 'height');
my $new_width = "300";
my $ritu = $new_width / $width;
$width = $width * $ritu;
$height = $height * $ritu;
$image->Resize(width=>$width, height=>$height);
$image->Profile(name => "*", profile => "");
$image->Write("image_s.jpg");

※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。
ログインして回答する

みんなの回答

この質問へのコメント

コメントはありません

この質問への反応(ブックマークコメント)

質問の情報

登録日時
2006-03-18 11:42:29
終了日時
2006-03-21 08:48:07
回答条件
回答にURL必須 1人2回まで

この質問のカテゴリ

この質問に含まれるキーワード

Perl1679CGI2023スクリプト2307ピクセル258レンタルサーバー874HTML5036

人気の質問

メニュー

PC版