App-GUI-GoLP
view release on metacpan or search on metacpan
# From https://conwaylife.com/wiki/List_of_Life-like_rules
my %rule_name_to_BS = (
"Conway's Life" => 'B3/S23',
"Seeds" => 'B2/S',
"Live Free or Die" => 'B2/S0',
"Flock" => 'B3/S12',
"LowLife" => 'B3/S13',
"Long Life" => 'B345/S5',
"Amoeba" => 'B357/S1358',
"Geology" => 'B3578/S24678',
"HighLife" => 'B36/S23',
"Day and Night" => 'B3678/S34678',
"Pedestrian Life" => 'B38/S23',
"HoneyLife" => 'B38/S238',
"Maze" => 'B3/S12345',
"Mazectric" => 'B3/S1234',
"Star Trek" => 'B3/S0248',
"Life without death" => 'B3/S012345678',
"Persian rug" => 'B234/S',
"Coral" => 'B3/S45678',
[ 'ten_s)' => '10 s' => sub { $_[0]->Timer->timeout(10000); } ],
]],
[ '~Rules' => [
[ '*(B3/S23' => "Conway's Life (B3/S23)" => sub { handle_rule($_[0], 'B3/S23'); } ],
[ 'B357/S1358' => "Amoeba (B357/S1358)" => sub { handle_rule($_[0], 'B357/S1358'); } ],
[ 'B345/S4567' => "Assimilation (B345/S4567)" => sub { handle_rule($_[0], 'B345/S4567'); } ],
[ 'B34/S456' => "Bacteria (B34/S456)" => sub { handle_rule($_[0], 'B34/S456'); } ],
[ 'B3/S45678' => "Coral (B3/S45678)" => sub { handle_rule($_[0], 'B3/S45678'); } ],
[ 'B3678/S34678' => "Day and Night (B3678/S34678)" => sub { handle_rule($_[0], 'B3678/S34678'); } ],
[ 'B3/S12' => "Flock (B3/S12)" => sub { handle_rule($_[0], 'B3/S12'); } ],
[ 'B3578/S24678' => "Geology (B3578/S24678)" => sub { handle_rule($_[0], 'B3578/S24678'); } ],
[ 'B1/S1' => "Gnarl (B1/S1)" => sub { handle_rule($_[0], 'B1/S1'); } ],
[ 'B36/S23' => "HighLife (B36/S23)" => sub { handle_rule($_[0], 'B36/S23'); } ],
[ 'B38/S238' => "HoneyLife (B38/S238)" => sub { handle_rule($_[0], 'B38/S238'); } ],
[ 'B3/S012345678' => "Life without death (B3/S012345678)" => sub { handle_rule($_[0], 'B3/S012345678'); } ],
[ 'B2/S0' => "Live Free or Die (B2/S0)" => sub { handle_rule($_[0], 'B2/S0'); } ],
[ 'B345/S5' => "Long Life (B345/S5)" => sub { handle_rule($_[0], 'B345/S5'); } ],
[ 'B3/S13' => "LowLife (B3/S13)" => sub { handle_rule($_[0], 'B3/S13'); } ],
[ 'B3/S12345' => "Maze (B3/S12345)" => sub { handle_rule($_[0], 'B3/S12345'); } ],
[ 'B3/S1234' => "Mazectric (B3/S1234)" => sub { handle_rule($_[0], 'B3/S1234'); } ],
[ 'B368/S245' => "Morley (B368/S245)" => sub { handle_rule($_[0], 'B368/S245'); } ],
( run in 0.778 second using v1.01-cache-2.11-cpan-8f98c5d2c55 )