Help for this page

Select Code to Download

Select or download this

use Tk;
use Tk::Graph;
...
$graph->set($data);        # set data

MainLoop();