...
my $slide = $presentation->slides($slideNumber);
if ($slide->shapes($shapeNumber)->TextFrame->HasText)
{
$slide->shapes($shapeNumber)->TextFrame->{TextRange}->{Text};
...