Re: Help with sort

2010-04-01 Thread rex njoku
Sorry, that was meant for 'williamawalters' (multi-key recursive approach), not Barry :) Rex On Thu, Apr 1, 2010 at 3:39 PM, rex njoku wrote: > Barry, > > Haven' t tried your code yet, but from what you wrote as your results...It > is wrong. In your results, you have: > CALIBRATION1 > CALIBR

Re: Help with sort

2010-04-01 Thread rex njoku
Barry, Haven' t tried your code yet, but from what you wrote as your results...It is wrong. In your results, you have: CALIBRATION1 CALIBRATION02 YESTECH-L3-RW1 YESTECH-L03-RW2 The correct order is supposed to be: CALIBRATION02 CALIBRATION1 YESTECH-L03-RW2 YESTECH-L3-RW1 Rex On Thu, Apr 1,

Re: Help with sort

2010-04-01 Thread williamawalters
-Original Message- From: Barry Brevik To: activeperl@listserv.ActiveState.com Sent: Wed, Mar 31, 2010 8:36 pm Subject: Help with sort > I'm having a problem sorting data items that are alpha-numeric strings. I know how to do it if the string is all alpha or all n

RE: Help with sort

2010-04-01 Thread BOURGNEUF Francois
Hi, You can solve this using a schwartzian transformation : @x= map { ( @t = split /(\d+)/ ); if ( $#t > $max ) { undef $sort; $max = $#t; foreach ( 0 .. $max ) { $occ = $_ + 1;

RE: Help with sort

2010-04-01 Thread Brian Raven
Barry Brevik <> wrote: > I'm having a problem sorting data items that are alpha-numeric > strings. > I know how to do it if the string is all alpha or all numeric, but > the combo eludes me. > > Take as example the following code. It is my desire that the machine > names be processed in the orde