Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: Sorting on Section Numbers

by acme (Novice)
on Jul 28, 2000 at 18:48 UTC ( #24858=note: print w/ replies, xml ) Need Help??


in reply to Sorting on Section Numbers

Of course, there is a module on CPAN which does what you want! It's called Sort::Versions, available from http://search.cpan.org/search?dist=SortVersions and it basically does what you want:

#!/usr/local/bin/perl

use strict;
use Sort::Versions;

my @sections = qw(2.1.7 2.2 3.4a 2.13 1 2);
@sections = sort versions @sections;
print "@sections\n"; # prints "1 2 2.1.7 2.2 2.13 3.4a"
Hope this helps! Leon


Comment on Re: Sorting on Section Numbers
Replies are listed 'Best First'.
Re: Re: Sorting on Section Numbers
by tye (Cardinal) on Jul 28, 2000 at 18:59 UTC

    Unfortunately, this module fails for some simple cases:

    use Sort::Versions; print join(" ",sort versions qw(1.2a 1.10a)),"\n";
    produces
    1.10a 1.2a

    Note that this matches the behavior described in the module's documentation, but I think it isn't what most people would want.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://24858]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (14)
As of 2015-07-30 14:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (271 votes), past polls