$wbook = Win32::OLE->GetObject($fullname_input_file);