Re: Finding the max()/min()


Syntactic Confectionery Delight
	PerlMonks

by Zaxo (Archbishop)

on Nov 11, 2004 at 02:38 UTC ( #406885=note: print w/replies, xml )

Need Help??

Here's a pair I like, similar to your delightfully symmeteric third example,

# max
my $max = ($x, $y)[$x < $y];

# min
my $min = ($x, $y)[$x > $y];
[download]

Those are slightly forthish, in lifting a logical value to arithmetic use.

Update: As subroutines,

sub max ($$) { $_[$_[0] < $_[1]] }
sub min ($$) { $_[$_[0] > $_[1]] }
[download]

I used prototypes there because the usual perl min and max extracts the extreme of a list, instead of from just two values.

After Compline,
Zaxo

Comment on Re: Finding the max()/min() Select or Download Code

In Section Meditations

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://406885]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others taking refuge in the Monastery: (4)

As of 2023-12-04 02:57 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?