Re: [e-smith-devinfo] sorting integers in perl

2001-10-10 Thread Greg Zartman
On Wednesday 10 October 2001 05:40 am, stephen noble wrote: > >Try: > > > >foreach (sort { $a <=> $b } keys %dungog) > >{ > >} If you have a list of integers, the following will sort them in desending order: @arrayToSort (1,2,3,4,5,6); @sortedArray = sort {$b <=> $a} @arrayToSort; Greg Zartman

Re: [e-smith-devinfo] sorting integers in perl

2001-10-10 Thread Greg Zartman
On Wednesday 10 October 2001 05:40 am, stephen noble wrote: > >Try: > > > >foreach (sort { $a <=> $b } keys %dungog) > >{ > >} > -- Please report bugs to [EMAIL PROTECTED] Please mail [EMAIL PROTECTED] (only) to discuss security issues Support for registered customers and partners to [EMAIL PROT

Re: [e-smith-devinfo] sorting integers in perl

2001-10-09 Thread stephen noble
>Try: > >foreach (sort { $a <=> $b } keys %dungog) >{ >} it didn't affect the sort order it did created error logs complaining about the non numeric keys are you listening skud ? -- Please report bugs to [EMAIL PROTECTED] Please mail [EMAIL PROTECTED] (only) to discuss security issues Support

Re: [e-smith-devinfo] sorting integers in perl

2001-10-08 Thread Charlie Brady
On Tue, 9 Oct 2001, stephen noble wrote: > >my @pmRules = (); >foreach (sort keys %dungog) >{ > push (@pmRules, $_) > if (db_get_type(\%dungog, $_) eq "$acctName"); >} > > is a fragment of perl code used frequently in panel functions > that extracts keys form a hash and