$res = bless( {
                'Count' => undef,
                'Security_' => bless( {
                                        'ImpersonationLevel' => 3,
                                        'AuthenticationLevel' => 6,
                                        'Privileges' => bless( {
                                                                 'Count' => 1
                                                               }, 'Win32::OLE' )

                                      }, 'Win32::OLE' )
              }, 'Win32::OLE' );