$list=split(/,/,@array1,4);