my $App = Win32::OLE->GetActiveObject( "Outlook.Application" );
  die "No Outlook\n" unless defined $App;
  my $OE = $App->Explorer();

  ... To be filled in when I'm at home ...