Array Perl

  1. Home
  2. Perl
  3. Array
  4. Push value to an array
@a = (1 .. 10);
foreach (@a) {
   if ($_ > 5) {
      push @b, $_
   }
};
print join(", ", @b);