#!/usr/local/bin/perl use GD; $p = 3.1415926535; # パイを表現 $rad = 360 / (2 * $p); # ラジアンを表現 @circles = ("Obj-1", "Obj-2", "Obj-3", "Obj-4", "Obj-5"); $im = new GD::Image(500,400); #PNGファイルの大きさを設定 #色の定義 $white = $im…