print IMG $gd->plot(\@data)->png;