$matrix[$_][4]=undef for(0..4);