2006/06/15 - memo - unknownplace.org仕事用に作ったの、ちょっと整備してリリース。 use Imager; use Imager::Filter::RoundedCorner; my $image = Imager->new; $image->read( file => 'source.jpg' ); $image->filter( type => 'rounded_corner', radius => 10, bg => '#ffffff' ); $image->write( file => 'dest.jpg' ); とかって使う。 Imager 良いねー。夜時間があったら border のサポートもする。
