Help for this page

Select Code to Download


  1. or download this
    use v5.14;
use warnings;
...
  $state   = $state->($in);
  say "$last \t--($in)-> \t$state" if $log && $state;
}
  2. or download this
    *** Initializing
initial_state     --(0)->     some_state
...
some_state     --(0)->     some_state
some_state     --(1)->     final_state
*** Finalizing