This is the revision history for max in <freenode.net:#perlbot>
factoid_id | subject | copula | predicate | author | namespace |
---|---|---|---|---|---|
18 | max | is | sub max { return (sort { $b <=> $a } @_)[0] } # works on numbers, use cmp instead of <=> for characters/words | perlbot | <*:##NULL> |