Help for this page

Select Code to Download

Select or download this

####################################################################
##                               MAIN
####################################################################
...
  
}

Select or download this

my($turn) = @_;

  my @record = split ( /\n/, $turn);