Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Re: Re: Stable sorting in Perl (old)

by wirrwarr (Monk)
on Aug 28, 2003 at 07:13 UTC ( [id://287266]=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my @unsorted = 
      ([1,1], [2,1], [1,2], [2,2], [2,3], [1,3], [2,4], [1,4]);
    ...
    __END__
    11 12 13 14 23 21 24 22
    11 12 13 14 23 21 24 22
    
  2. or download this
    $unsorted[$a]->[0] <=> $unsorted[$b]->[0] || $a <=> $b
    

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others having a coffee break in the Monastery: (2)
As of 2024-04-16 14:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found