perl -e '@array;
$array[2]=undef;
foreach(@array){print "yes"}'
# Output: yesyesyes