•Mit den Zeilen
•
• my $c1 = $mw->Canvas(-width => '350',
-height
=> '350',
)
•
•wird eine Canvas erzeugt, welche 350x350 Pixel groß ist. Dann werden mit createLine und createText x-, y-Achse und
Achsenbeschriftungen erzeugt:
•
• $c1->createLine( 25, 175, 325, 175,
-arrow => 'last', );
$c1->createText( 335, 175,
-fill => 'blue',
-text => 'X', );