$chart_one = [[ "Passed","100"],["Fail","20"]
];
$chart_two =[[ "Passed","80"],["Fail","30"]
$chart_three =[[ "Passed","60"],["Fail","70"]

$range_of_data_one = wb->ActiveSheet->Range("A2:B3");
$range_of_data_one->{Value} = $chart_one; 

$range_of_data_two = wb->ActiveSheet->Range("D2:E3");	
$range_of_data_two->{Value} = $chart_two; 	

$range_of_data_three = wb->ActiveSheet->Range("G2:H3");	
$range_of_data_three->{Value} = $chart_three;

		
$chart = wb->Charts->Add;
$chart->SetSourceData($range_of_data_one, 2);
$chart->{ChartType} = 70;
$chart->Location(xlLocationAsObject, "Sheet 2");	


$chart = wb->Charts->Add;

$chart->SetSourceData($range_of_data_two, 2);
$chart->{ChartType} = 70;
$chart->Location( xlLocationAsObject, 'Sheet 2' );


$chart = wb->Charts->Add;
$chart->SetSourceData($range_of_data_three, 2);
$chart->{ChartType} = 70;
$chart->Location( xlLocationAsObject, 'Sheet 2' );