setPlotArea(100, 40, 280, 240); # Add a legend box at (405, 100) $c->addLegend(405, 100); # Add a title to the chart $c->addTitle("Weekday Network Load"); # Add a title to the y axis. Draw the title upright (font angle = 0) $textBoxObj = $c->yAxis->setTitle("Average\nWorkload\n(MBytes\nPer Hour)"); $textBoxObj->setFontAngle(0); # Set the labels on the x axis $c->xAxis->setLabels($labels); # Add three bar layers, each representing one data set. The bars are drawn in # semi-transparent colors. $c->addBarLayer($data0, 0x808080ff, "Server # 1", 5); $c->addBarLayer($data1, 0x80ff0000, "Server # 2", 5); $c->addBarLayer($data2, 0x8000ff00, "Server # 3", 5); # output the chart header("Content-type: image/png"); print($c->makeChart2(PNG)); ?>