examples/hop_table.pl

   1 #
   2 # hop table construction
   3 #
   4
   5 package DXProt;
   6
   7 # default hopcount to use
   8 $def_hopcount = 15;
   9
  10 # some variable hop counts based on message type
  11 %hopcount =
  12 (
  13  11 => 10,
  14  16 => 10,
  15  17 => 10,
  16  19 => 10,
  17  21 => 10,
  18 );
  19
  20 #
  21 # the per node hop control thingy
  22 #
  23
  24 %nodehops =
  25 (
  26  GB7DJK => {
  27                         16 => 23,
  28                         17 => 23,
  29                    },
  30  GB7TLH => {
  31                         19 => 99,
  32                         21 => 99,
  33                         16 => 99,
  34                         17 => 99,
  35                    }
  36 );