]> dxcluster.org Git - spider.git/blob - msg/forward.pl.issue
remove shadow $i
[spider.git] / msg / forward.pl.issue
1 #
2 # this is an example message forwarding file for the system
3 #
4 # The format of each line is as follows
5 #
6 #     type    to/from/at pattern action  destinations
7 #     P/B/F     T/F/A     regex   I/F    [ call [, call ...] ]
8 #
9 # type: P - private, B - bulletin (msg), F - file (ak1a bull)
10 # to/from/at: T - to field, F - from field, A - home bbs, O - origin 
11 # pattern: a perl regex on the field requested
12 # action: I - ignore, F - forward
13 # destinations: a reference to an array containing node callsigns
14 #
15 # if it is non-private and isn't in here then it won't get forwarded 
16 #
17 # Currently only type B msgs are affected by this code.
18
19 # The list is read from the top down, the first pattern that matches
20 # causes the action to be taken.
21 #
22 # The pattern can be undef or 0 in which case it will always be selected
23 # for the action specified
24 #
25 # If the BBS list is undef or 0 and the action is 'F' (and it matches the
26 # pattern) then it will always be forwarded to every node that doesn't have 
27 # it (I strongly recommend you don't use this unless you REALLY mean it, if
28 # you allow a new link with this on EVERY bull will be forwarded immediately
29 # on first connection)
30 #
31
32 package DXMsg;
33
34 @forward = (
35 'B',    'O',    'K1XX', 'I',    0,      
36 'B',    'T',    'LOCAL',        'F',    [ qw(GB7TLH GB7DJK-1) ],
37 'B',    'T',    'ALL',  'F',    [ qw(GB7TLH GB7DJK-1 GB7BAA) ],
38 'B',    'T',    'UK',   'F',    [ qw(GB7TLH GB7DJK-1 GB7BAA) ],
39 );