print for @a[@indices] or 1..11 #### print for grep($a[$_], @indices) ? @a[@indices] : 1..11; print for grep(defined $a[$_], @indices) ? @a[@indices] : 1..11; print for grep(exists $a[$_], @indices) ? @a[@indices] : 1..11; print for !grep(!$a[$_], @indices) ? @a[@indices] : 1..11; print for !grep(!defined $a[$_], @indices) ? @a[@indices] : 1..11; print for !grep(!exists $a[$_], @indices) ? @a[@indices] : 1..11; # update: actually use slices after ?