pointer auf map<key,value> (gelöst) (Allgemeines zu Perl)

[thread]17806[/thread]

pointer auf map<key,value> [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 16

Articles: hide open all | hide show old branches

+3 replies
Gast Graf Herschel

2012-10-02 14:35
Schönen guten Tag

Zum einfacheren Schreiben in eine Datenbank erstelle ich eine map wie:
Code: (dl )

1 2 3 4

my %dbo=(); $dbo{'uri'} = $uri; $dbo{'host'} = $host; usw.
Wenn alles gesammelt ist, möchte ich in einer funktion diese Daten in die db schreiben, wobei key der Spaltenname ist.
Code: (dl )

1 2 3 4 5 6 7 8 9 10

if(!db_update(\%dbo)) # hoffe dass das der pointer auf das objekt ist usw. sub db_update { my $p_dpo = $_[0]; # sollte auf das objekt zeigen my $value = ${%dbo{'host'}}; # erscheint mir logisch, ist aber wohl falsch my $value = ${%dbo}{'host'}; # will er gar nicht my $value = $dbo{'host'}; # geht sowieso nicht }
Wie funktioniert das? Vielleich kann mir jemand helfen
Vielen Dank
Last edited: 2012-10-02 14:38:04 +0200 (CEST)
- +2 replies
- Linuxer
  
  2012-10-02 14:41
  User since
  2006-01-27
  3890 Artikel
  HausmeisterIn
  Du hast einen Hash %dbo und willst auf einzelne (skalare) Werte zugreifen: $dbo{'user'}
  
  Nun gibst Du eine Hash-Referenz an die Sub-Routine: foo( \%dbo )
  
  Innerhalb der Sub hast Du jetzt nur eine Referenz, die auf den Hash verweist; also musst Du dereferenzieren: $hashref->{'user'}. Beachte die Pfeil-Syntax.
  
  Siehe auch http://perldoc.perl.org/perlreftut.html
  
  Angewandt auf Dein konkretes Beispiel:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  sub db_update { my $dpoR = shift; # get hash ref my $host = $dpoR->{'host'}; my $user = $dpoR->{'user'}; # ... }
  
  Last edited: 2012-10-02 14:43:55 +0200 (CEST)
  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!
  - Gast Graf Herschel
    
    2012-10-02 15:20
    2012-10-02T12:41:09 Linuxer
    Du hast einen Hash %dbo und willst auf einzelne (skalare) Werte zugreifen: $dbo{'user'}
    
    Nun gibst Du eine Hash-Referenz an die Sub-Routine: foo( \%dbo )
    
    Innerhalb der Sub hast Du jetzt nur eine Referenz, die auf den Hash verweist; also musst Du dereferenzieren: $hashref->{'user'}. Beachte die Pfeil-Syntax.
    
    Siehe auch http://perldoc.perl.org/perlreftut.html
    
    Angewandt auf Dein konkretes Beispiel:
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7
    
    sub db_update { my $dpoR = shift; # get hash ref my $host = $dpoR->{'host'}; my $user = $dpoR->{'user'}; # ... }
    
    Vielen Dank, so funktioniert es, du bist ein Schatz!
    Ich tu mir mit dem Finden wegen meinem Mangel an Wissen ob der Perl typischen Bezeichnungen schwer. Aber das wird sich bessern. Danke euch allen!
    Last edited: 2012-10-02 15:34:27 +0200 (CEST)

View all threads created 2012-10-02 14:35.