Select Code to Download

$ol = Win32::OLE->new('Outlook.Application', sub { $_[0]->Quit })or di
+e "error: $!\n";

$ol = Win32::OLE->new(['computername','Outlook.Application'], sub { $_
+[0]->Quit })or die "error: $!\n";