Aside from the issue of readability, which is obviously subjective, this solution will drop any occurences of '0' from the array. A more explicit check is necessary, as in the earlier grep solutions:

my @newArray;

foreach my $element ( @array ) {
  push $element, @newArray
    if defined $element and $element ne '';
}
[download]

(Personally, I also prefer grep to solve this problem.)