Help for this page
#! perl -slw use strict; ... [ -1 1 1 1 1 -1 1 1 1 ]
c:\test>234118 [1,1,1,1,1,1] ... [123,123,123,123,123,123,123,123,123] [-1,1,1,1,1,-1,1,1,1]