{ do_something( $_) } forall ( @alist ) where { condition( $_ ) }