Re: find the lowest number?

[Sudarshan Raghavan]

On Fri, 30 Aug 2002, Ramprasad A Padmanabhan wrote:

> 
> @a = qw(121 23 31 4 11);
> 
> print "LOWEST " . (reverse sort @a )[0];

By default sort does a lexical sort, this will not work
Correct way to do this

my @list = qw(121 23 31 4 11);
print "LOWEST: ", (sort {$a <=> $b} @list)[0];



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]