Help for this page

Select Code to Download

Select or download this

use Tk;
use strict;
...
#$drawing->createRectangle(150,100,250,200,-fill=>"red");
#$drawing->createText(200,275,-text=>"Some text on my drawing!",-ancho
+r=>"center");
MainLoop();