$VAR1 = bless( {
       'Test' => bless( {
              'Environment' => bless( {}, 'Win32::OLE' ),
              ...