develooper Front page | perl.beginners | Postings from February 2002

Re: finding max value

Thread Previous | Thread Next
From:
Jon Molin
Date:
February 13, 2002 05:11
Subject:
Re: finding max value
Message ID:
3C6A6547.D86B8E8F@resfeber.se
Frank wrote:
> 
> On Wed, Feb 13, 2002 at 01:17:50PM +0100, Andrea wrote:
> > In article <Pine.GSO.4.21.0202122117250.11490-100000@crusoe.crusoe.net> wrote "Jeff 'Japhy' Pinyan"
> > <jeffp@crusoe.net>:
> >
> > >>I have a set of functions that give numeric results, and I need to compare  them and choose the
> > >>maximal value. Is there any simple way of finding max?
> >
> > Don't think about it,
> > just use the CPAN module List::Util.
> >
> > Then you only have to write
> > my $max = max @values;
> ---end quoted text---
> 
> or:
> $max= (sort @values)[-1];

That doesn't seems like a good sollution,

@a = (-1, -5, -3);
$max= (sort @a)[-1];


gives -5 as max, it is max min but not max :)


> 
> Personally, I'd prefer Japhy's method for efficiency.

same here, it's straightforward

/jon
> 
> --
>  Frank Booth - Consultant
> Parasol Solutions Limited.
> (www.parasolsolutions.com)
> 
> --
> To unsubscribe, e-mail: beginners-unsubscribe@perl.org
> For additional commands, e-mail: beginners-help@perl.org

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About