conf/chat_label.stem

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