There is also grep (for conditionals):

perl -le 'print $_ for grep{/pattern/}@arr'
[download]

-enlil