if (defined $array->[1] and $array->[1] eq 'foo') { ... }