in reply to Re: Sorting - lower to upper
in thread Sorting - lower to upper

Ditto what I said in •Re^2: Sorting - lower to upper. I guess I'm going to have to watch every node in this thread.

-- Randal L. Schwartz, Perl hacker
Be sure to read my standard disclaimer if this is a reply.

Replies are listed 'Best First'.
Re^3: Sorting - lower to upper
by orderthruchaos (Scribe) on Jul 15, 2004 at 17:23 UTC
    Taking merlyn's advice into account, I'll change my answer;-)

    --from above--

    Don't forget about the Schwartzian Transform: 
    my %hash = qw/John 1 Bob 1 xavier 1 alice 1/;

my @keys = map { (my $x = $_) =~ tr/a-zA-Z/A-Za-z/; $x }
           sort
           map { (my $x = $_) =~ tr/a-zA-Z/A-Za-z/; $x }
           keys %hash;

print "@keys\n";

    [download]
    Will give you 
    alice xavier Bob John

    [download]
[reply]
[d/l]
[select]
Re^3: Sorting - lower to upper
by orderthruchaos (Scribe) on Jul 15, 2004 at 17:13 UTC
    Sorry about that... this thread is growing too fast for me to keep up!
[reply]

In Section Seekers of Perl Wisdom