$Slide = $Presentation-> Slides->Add({Index => $position, Layout => ppLayoutBlank});
$Slide->{Name} = "test";

$graph_shape = $Slide->Shapes->AddOleObject({
   Left => 10,
   Top => 40,
   Height => 450,
   Width => 650,
   ClassName => "MSGraph.Chart",
   Link => 0});
$graph = $graph_shape->OLEFormat->{Object}; # ms graph chart object

# i can now work with $graph