$chart->{HasTitle} = 1;
$chart->ChartTitle->{Text} = "Some Title";