for my $element (@a) {
  print $element if defined($element);
}