$exp[12] = undef; printf "%d,%d,%d,%d\n", exists $exp[11], exists $exp[12], exists $exp[13], scalar @exp; printf "%d,%d,%d,%d\n", defined $exp[11], defined $exp[12], defined $exp[13], scalar @exp; #### 0,1,0,13 0,0,0,13