my $gd = $my_graph->plot(\@data) or die $my_graph->error;
print $gd->gif();