sort ??? - #79561 (Allgemeines zu Perl)

Strat

2004-01-27 00:02

User since
2003-08-04
5246 Artikel
ModeratorIn

[E|B
,26.01.2004, 21:11]du kannst "sort" nicht einfach sagen, wie es zu sortieren hat.

nein; sort kann man eine vergleichsoperation als Coderef mitgeben, die die folgenden drei Werte zurueckgeben sollte:
< 0: das linke ist kleiner
= 0: beide sind gleich gross
> 0: das linke ist groesser

z.B.

Code: (dl )

@sorted = sort { uc($a) cmp uc($b) } @unsorted;

Code: (dl )

@sorted = sort SortSub @unsorted;
sub SortSub {
  $irgendwas{$a} <=> $irgendwas{$b};
}

steve's loesung zeigt das sehr schoen

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/