Commit | Line | Data |
4536f655 |
1 | # chat.stem |
2 | # |
3 | [ |
4 | class => 'Stem::Console', |
5 | ], |
6 | [ |
7 | class => 'Stem::SockMsg', |
8 | name => 'A', |
9 | args => [ |
10 | port => 6666, |
11 | server => 1, |
12 | cell_attr => [ |
13 | 'data_addr' => ':sw:a' |
14 | ], |
15 | ], |
16 | ], |
17 | [ |
18 | class => 'Stem::SockMsg', |
19 | name => 'B', |
20 | args => [ |
21 | port => 6667, |
22 | server => 1, |
23 | cell_attr => [ |
24 | 'data_addr' => ':sw:b' |
25 | ], |
26 | ], |
27 | ], |
28 | [ |
29 | class => 'Stem::SockMsg', |
30 | name => 'C', |
31 | args => [ |
32 | port => 6668, |
33 | server => 1, |
34 | cell_attr => [ |
35 | 'data_addr' => ':sw:c' |
36 | ], |
37 | ], |
38 | ], |
39 | [ |
40 | class => 'Stem::SockMsg', |
41 | name => 'D', |
42 | args => [ |
43 | port => 6669, |
44 | server => 1, |
45 | cell_attr => [ |
46 | 'data_addr' => ':sw:d' |
47 | ], |
48 | ], |
49 | ], |
50 | [ |
51 | class => 'Stem::Switch', |
52 | name => 'sw', |
53 | args => [ |
54 | |
55 | in_map => [ |
56 | |
57 | a => [ qw( a b c d ) ], |
58 | b => 'a', |
59 | c => [ qw( b d ) ], |
60 | d => 'c', |
61 | ], |
62 | |
63 | out_map => [ |
64 | |
65 | a => 'A', |
66 | b => 'B', |
67 | c => 'C', |
68 | d => 'D', |
69 | ], |
70 | ], |
71 | ], |