my $image = $graph->plot(\@data);
print $image->png;