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