my @_remainObj = map {
      my $_obj_prevVal = $_->{OBJECT};   
      my $_mnum_prevVal = $_->{METRIC};
      my $_notObj_rObjects = grep { $_obj_prevVal ne $_->{OBJECT} and $_mnum_prevVal eq "1"} @r_objects;
      $_notObj_rObjects ? $_obj_prevVal : (); 
      }
      @prev_values;