my @temp = map { [split /,/] } (split/\n/,$data);