@only_defined = grep { defined($_) } @somearray;
  %hash_defined = map { $_ => 1 } @only_defined;

  #and since $_ is the default argument, you can also write
  @only_defined = grep { defined } @somearray;
  @only_begins_with_a = grep { /^a/ } @somearray;