Thread Natürlicher Sort, aber nicht mit @sorted = sort @unsorted (30 answers)
Opened by Student87 at 2013-02-05 17:52

Student87
 2013-02-05 17:52
#165488 #165488
User since
2012-11-08
73 Artikel
BenutzerIn
[default_avatar]
Hab jetzt über ne Stunde rumgerätselt und bin in verschiedene Sackgassen gerannt, ich kriegs nicht hin...

Das file im Anhang muss gesorted werden:

chr1
.
.
.
ch22
chrX
chrY


Mein bester Ansatz (gab zwischenzeitlich auch andere):

Code (perl): (dl )
1
2
3
4
5
6

my @unsorted = <IN>;
my @sorted = sort {
(my $first) = $a =~ m/chr(.+)/;
(my $second) = $b =~ m/chr(.+)/;
#### hier muss etwas hin
} @unsorted;


Mit "@sorted = sort @unsorted" bekomme ich zwar nen natürlichen sort, aber dann benutzt er ja immer ganze Zeilen anstatt meine matches für $first/$second ...

Ich will sagen:
Vergleiche $first mit $second auf natürliche Weise.

Wie geht das?

LG
Anhänge
text/plain
77 lines
to_be_sorted.txt

View full thread Natürlicher Sort, aber nicht mit @sorted = sort @unsorted