my @array;$str = "000101010101010......" ;$str =~ s{(\d{10000})}{push (@array, $1)}eg;
很简单，先split ,然后将10000个push进数组。最好有实际的数字，好操作
说的不大清楚，是有一个数组有N个数字，然后每10000个做一个子数组么？
