åç´ãªéãåããã®ä¾ Composite()ã使ãã¨2ã¤ã®ç»åãéãåããã¦åæãããã¨ãåºæ¥ã¾ããç°¡åãªä¾ããå§ãã¾ãã #!/usr/local/bin/perl -w use strict; use Image::Magick; # å ç»å my $file = "sample.jpg"; # éããç»å my $file2 = "sample2.jpg"; # å ç»åèªã¿è¾¼ã my $image = Image::Magick->new; $image->Read($file); # éããç»åãèªã¿è¾¼ã my $image2 = Image::Magick->new; $image2->Read($file2); # éããç»åã®ãµã¤ãºå¤æ´ $image2->Resize(width=>150, height=>105, blur=>0.7); # ç»åãåæãã $image-
{{#tags}}- {{label}}
{{/tags}}