Post History
Perl, 23 bytes sub f{!grep$_[0]-$_,@_} find elements that don't equal the first element return true if there aren't any, else false
#1: Initial revision
by
jhnc
·
2026-03-22T07:07:19Z (6 months ago)
# Perl, 23 bytes
```
sub f{!grep$_[0]-$_,@_}
```
* find elements that don't equal the first element
* return true if there aren't any, else false