I often use the ChartWizard to add a title and legend.

    my $Chart2  = $Book->Charts->Add;
    $Chart2->ChartWizard($Range2,xl3DPie,6,xlColumns,1,0,1,"Error Perc
+entages"); #uses the first column to name each series
[download]

MS Doc

And I'll second the advice to start with a small working script and slowly add to it.