my   @matrix;
push @matrix, [ split ] while <DATA>;