0
Image::Magick
system("convert $imageurl $new");
system("convert $new -geometry 480x360 -blur .8 -quality 100 $new");
和Perl - 如何用「系統」調用Image :: Magick調整大小和註釋?
system("convert $imageurl $new");
system("convert $new -resize 480x360 -blur .8 -quality 100 $new");
上述兩個做工精細,但我看不出形狀和調整之間的差異明顯。閱讀它,在我的頭上,它的工作原理如此,當我去這裏時,我會學習。
對於標註,下面的工作正常:
my $image;
my $test_text="testies123";
$image=Image::Magick->new;
my $x=$image->Read(filename=>"$new");
$x=$image->Annotate(text=>"$test_text",font=>'Candice.ttf',fill=>'#5BADFF',pointsize=>'14',gravity=>'SouthEast', x=>5, y=>5);
$x=$image->Write(filename=>'new_file.jpg'); undef $image;
(上面例子中的$瓦爾均明顯之前聲明。)
我所試圖做的是所有組合成一個較短的程序。
像:
system("convert $new -geometry 480x360 -blur .8 -quality 100 -annotate -text testies123 -font Candice -fill blue -pointsize 14 -gravity SouthEast -x 5 -y 5 $new");
我已經嘗試了上述並且還幾個變化只是試圖通過系統來標註(),但是,我只是不知道這一點。
也許還有更好的辦法呢? 在此先感謝教這個老狗的另一個竅門。
(1)爲什麼你需要一個較短的套路,和(2)爲什麼不直接使用圖像:: Magick做轉換,以及作爲註釋,而不是命令行工具? – MkV 2010-12-05 17:50:47