my @rules_lpo = (
  default => sub {
     $_[0] => $_[1]->{_content};
    print "$_[0] : $_[1]->{_content}\n";
  },
  'summary' => sub {
    $insummary = 1;
  },
  'detail1' => sub {
    $ind1 = 1;
    $insummary = 0;
  },
  'detail2' => sub {
    $ind2 = 1;
    $ind1 = 0;
  },
  'item' => sub {
    if ($insummary) {
      $sumvalue = $_[1]->{value};
    }
    if ($ind1) {
      $d1value = $_[1]->{value};
    }
    if ($ind2) {
      $d2value = $_[1]->{value};
    }
  }
);