ある一定量の階層ごとに画素値を決めて処理することをポスタリゼーションと呼ぶ。というわけで、use strict;use warnings;use Imager;use Image::Size;my $img = Imager->new;$img->read(file => 'test.png') or die $img->errstr;my ($max_width, $max_heig…