return grep { $_ eq $_[0] } @_[ 1 .. $#_ ]; #### return ~~grep { $_ eq $_[0] } @_[ 1 .. $#_ ];