package Node;

BEGIN {
   my $idx = 0;
   require constant;
   constant->import($_ => $idx++) foreach qw(
      IDX_PARENT
      NEXT_IDX
   );
}