my $link = $shape->AddHyperlink();
$link->{Description} = "Google";
$link->{Address} = "http://www.google.de";