Win32::OLE->new( 'InternetExplorer.Application', sub {$_[0]->Quit;} )