[Tie-IxHash] SortbyValue / Key (gelöst) (Fragen zu Perl-Modulen)

[thread]20709[/thread]

[Tie-IxHash] SortbyValue / Key [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 9

Articles: hide open all | hide show old branches

+9 replies
Kean

2019-12-20 10:11
User since
2004-08-18
463 Artikel
BenutzerIn
Hallo Perl-Gemeinde,

da ein Hash bei Perl ja keine feste Reihenfolge hat, nutze ich mittlerweile immer häufiger Tie-IxHash.

Für das Sortieren eines Tie-IxHash habe ich folgendes Beispiel gefunden, was auf funktioniert:
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

use strict; use warnings; use 5.010; use Tie::IxHash; my %people; my $t = tie %people, 'Tie::IxHash'; %people = (first => 1, second => 2, third => 3); $people{another} = 5; $people{fourth} = 4; $t->SortByKey; # oder SortByValue while (my ($name, $nummer) = each %people) { print "$name->$nummer\n"; }
In meinem Code deklariere ich die Objekte aber verkürzt:
Code (perl): (dl )

tie my %people, 'Tie::IxHash';
Wenn ich jetzt $people->SortByValue versuche, kommt folgende Fehlermeldung:
Code: (dl )

Can't call method "SortByValue" without a package or object reference
Gibt es eine Möglichkeit die Sortierfunktionen zu nutzen ohne die Deklarierung zu ändern?
- +5 replies
- Linuxer
  
  2019-12-20 11:58
  
  User since
  2006-01-27
  3891 Artikel
  HausmeisterIn
  
  Naja, Du hast einen Hash %people der an Tie::IxHash gebunden wird.
  Wo kommt jetzt der Skalar $people plötzlich her, mit dem Du die Methode SortByValue aufrufen willst?
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
  - +4 replies
  - Kean
    
    2019-12-20 13:02
    
    User since
    2004-08-18
    463 Artikel
    BenutzerIn
    
    2019-12-20T10:58:32 Linuxer
    Wo kommt jetzt der Skalar $people plötzlich her, mit dem Du die Methode SortByValue aufrufen willst?
    
    Ich dachte ich kann mich über den Hash/Scalar irgendwie auf das Tie-IxHash Objekt beziehen...
    - +3 replies
    - Linuxer
      
      2019-12-20 14:17
      
      User since
      2006-01-27
      3891 Artikel
      HausmeisterIn
      
      Keine Ahnung, was Du tust. Du lieferst ja keinen nachvollziehbaren Code, was jetzt wirklich läuft, leider nur Fragmente.
      
      Nur weil ein Skalar $people den gleichen Textanteil hat wie ein Hash %people, stehen die nicht zwangsläufig in Verbindung.
      
      Entweder ziehst Du, wie rosti Dir schon gezeigt hat, das Objekt aus dem gebundenen Hash,
      oder Du modifizierst doch noch die Zeile, in der der Hash gebunden wird, und machst dort auch noch die Zuweisung an den Skalar:
      
      Code (perl): (dl )
      
      1 2 3 4
      
      my $people = tie my %people, 'Tie::IxHash'; # ... $people->SortByValue;
      
      Das sollte eigentlich so auch funktionieren.
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
      - +2 replies
      - rosti
        
        2019-12-20 14:37
        
        User since
        2011-03-19
        3507 Artikel
        BenutzerIn
        
        Als eine kleine Anmerkung: Es ist gerade das was tie() so auszeichnet: Die Möglichkeit, die Instanz jederzeit mit tied() aus der gebundenen Variable ziehen zu können.
        
        So genügt es, den Hash zu binden und das macht es unnötig, die Instanz in einer dedizierten Variablen durch den Code zu schleifen.
        
        Was letztendlich den Code vereinfacht sowie verständlicher und besser lesbar macht.
        
        MFG
        
        Linuxer
        
        2019-12-20 14:54
        
        User since
        2006-01-27
        3891 Artikel
        HausmeisterIn
        
        Ich zeige nur Möglichkeiten auf, die auch so in der Doku genannt sind.
        
        Was man von den Möglichkeiten benutzt und wie und warum man es nutzt, muss man selber als Programmierer/in entscheiden.
        
        TIMTOWDI eben.
        meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
        Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- haj
  
  2019-12-20 12:05
  User since
  2015-01-07
  561 Artikel
  BenutzerIn
  2019-12-20T09:11:26 Kean
  Gibt es eine Möglichkeit die Sortierfunktionen zu nutzen ohne die Deklarierung zu ändern?
  
  Das wird so nicht gehen: $people und %people sind zwei unterschiedliche Variable. Die Methoden-Syntax ->SortByValue kannst Du nur auf ein Objekt anwenden, also brauchst Du auch das OO-Interface.
  
  Ich empfehle auch, anstelle des Namens $t (der aus dem Doku-Beispiel kommt) eine sinnvolleren Variablennamen zu verwenden. Du kannst durchaus $people dafür verwenden:
  
  Code (perl): (dl )
  
  1 2
  
  my $people = Tie::IxHash->new(first => 1, second => 2, third => 3); $people->SortByValue; # Das geht nun!
- +2 replies
- rosti
  
  2019-12-20 12:51
  User since
  2011-03-19
  3507 Artikel
  BenutzerIn
  Wenn Du mit
  
  Code (perl): (dl )
  
  tie my %people, 'Tie::IxHash';
  
  den Hash bindest, kannst Du das Objekt auch später rausziehen:
  
  Code (perl): (dl )
  
  $obj = tied( %people );
  
  und damit die Methoden aufrufen. MFG
  - Kean
    
    2019-12-20 13:03
    
    User since
    2004-08-18
    463 Artikel
    BenutzerIn
    
    Diese Möglichkeit habe ich gesucht. Damit funktioniert es!
    Vielen Dank.

View all threads created 2019-12-20 10:11.