Hash :: Type. Hash :: Type-Modul enthält Pseudo-Hashes als Arrays, die an einen "Typ" (Liste der Felder) verbunden sind.
Jetzt downloaden

Hash :: Type. Ranking & Zusammenfassung

Hash :: Type. Stichworte

Perl-Modul Felder Arrays pseudo-hashhe. Liste der Felder

Hash :: Type. Beschreibung

Hash :: Type-Modul enthält Pseudo-Hashes als Arrays, die an einen "Typ" gebunden sind (Liste der Felder). Hash :: Type-Modul enthält Pseudo-Hashes als Arrays, die an einen "Typ" gebunden sind (Liste der Felder) .Synopsis verwenden Hash :: Type; # Erstellen Sie einen Hash :: Geben Sie mein $ personType = New Hash :: Typ (QW (Vorname LastName City)); # Erstellen und bevölkern ein paar Hashes, gebunden an $ personType Tie% Wolfgang, $ PersonType, "Wolfgang Amadeus", "Mozart", "Salzburg"; $ Ludwig = Neues $ PersonType ("Ludwig", "van Beethoven", "Wien"); $ jsb = neuer $ personType; $ jsb -> {city} = "Leipzig"; @ {$ jsb} {QW (Vorname LastName)} = ("Johann Sebastian", "Bach"; # Felder hinzufügen dynamisch $ personType-> Hinzufügen ("Geburt", "Tod") oder die "Felder nicht hinzugefügt"; $ Wolfgang {Geburt} = 1750; # Mehr kompletter Beispiel: Lesen Sie eine flache Datei mit den Headern auf der ersten Zeile My ($ headerline, @Datalines) = Karte {chomp; $ _ _}; mein $ ht = new hash :: type (split / t /, $ headerline); Foreach My $ Line (@Datalines) {My $ Data = NEU $ HT (Split / T /, $ Line); Work_with ($ data -> {somnefield}, $ data -> {tilotherfield}); } # Eine Alternative zu Zeit :: GMTIME UND TIME :: localime My $ TimeType = NEUE HASH :: Typ QW (SEC Min Stunde MADTAY MAY MON JAHR DA TAD DAY DAY); Mein $ localTime = Neuer $ Timetyp (lokal); mein $ gmaTime = neuer $ Timetyp (GMTIME); Print $ localTime -> {Hour} - $ gmaTime -> {Stunden}, "Stunden Unterschied zu GMT"; # Vergleichsfunktionen My $ byage = $ PersonType-> CMP ("Geburt: -Num, Nachname, Vorname"; Meine $ byamelength = $ PersonType-> CMP (LastName => {Länge ($ b) Länge ($ a)}, LastName => 'Alpha', Vorname => 'Alpha'); ShowPerson ($ _) foreach (sortieren $ bystage @people); ShowPerson ($ _) foreach (sortieren $ byamelength @people); # spezielle Vergleiche: datiert meine $ us_datecmp = $ myhashttype-> cmp ("somedatefield: m / d / y"); mein $ fr_inversedatecmp = $ myhashttype-> cmp ("somedatefield: -d.m.y"); Anforderungen: · Perl.

Hash :: Type. Zugehörige Software