my @array = (0,1,2,3,4,5,6,7,8,9); undef $array[5]; foreach (@array) { print if defined; }