In this example we want to filter all elements bigger than 10, for that we use grep like in this function:
|
1 2 3 4 5 6 7 8 9 10 11 12 |
#!/usr/bin/perl use strict; #example data my @array = (2, 17, 10, 9, 16, 3, 9, 16, 5, 1, 17, 14); #filter elements @array = bigger_than_10(@array); #print print "@array"; #function sub bigger_than_10 { return grep $_ >= 10, @_; } |
We got this as result:
|
1 |
17 10 16 16 17 14 |