Array mit Transkript-IDs ordnen (gelöst) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-11-17 04:44:40
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online
1 Gast

[thread]17543[/thread]

submit to reddit

Array mit Transkript-IDs ordnen [gelöst]

[gelöst]

Tags: perl5 Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+2 replies
ingobulla

2012-07-06 16:08
User since
2008-08-08
20 Artikel
BenutzerIn
Hallo,

ich habe ein Array mit Transkript-IDs, d.h. der Form g{Zahl}.t{Zahl}. Also z.B.
Code: (dl )

1 2 3 4

@ar = [ "g12.t2", "g779.t4", "g88.t4", "g12.t13" ]
Das Array soll nun bezüglich der beiden Zahlen geordnet werden (zuerst nach der ersten, dann nach der zweiten). Es soll also rauskommen
Code: (dl )

1 2 3 4

@ar_sorted = [ "g12.t2", "g12.t13", "g88.t4", "g779.t4" ]
Kann mir jemand sagen, wie man das kompakt löst?
- pq
  
  2012-07-06 16:22
  User since
  2003-08-04
  12208 Artikel
  Admin1
  was haste denn schon versucht?
  kennst du sort?
  kennst du die Schwartzian_transform?
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  my @sorted = map { $_->[0] } sort { $a->[1] <=> $b->[1] || $a->[2] <=> $b->[2] } map { [$_, m/^g(\d+)\.t(\d+)$/] } @ar;
  
  edit: im übrigen hast du mit @ar = [...] sicher nicht das, was du willst, das ist nämlich ein array mit genau einem element, welches eine arrayref ist.
  Last edited: 2012-07-06 16:24:49 +0200 (CEST)
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem

View all threads created 2012-07-06 16:08.