sub seperate_data { #### push(@{$arrays}, [split(/ /,$data[$a])]); }