or download this
#open the default Calendar and grab the items in the calendar (twice..
+.)
my $namespace = $outlook->GetNameSpace("MAPI") or die "can't open MAPI
+ namespace\n";
my $recurringitems = $namespace->GetDefaultFolder(olFolderCalendar)->{
+Items};
my $calitems = $namespace->GetDefaultFolder(olFolderCalendar)->{Items}
+;