Was bitte ist das für ein Konstrukt: ${_} (Allgemeines zu Perl)

[thread]19686[/thread]

Was bitte ist das für ein Konstrukt: ${_}

Tags: perl5 regex Ähnliche Threads

Leser: 17

Articles: hide open all | hide show old branches

+12 replies
peri

2015-06-09 16:31
User since
2009-02-06
12 Artikel
BenutzerIn
Hi all,

ich hab' in einem Script folgendes gefunden und mir ist unklar wozu das ist, bzw. was sich dahinter verbirgt:
Code: (dl )

${_}
Thx.
- bianca
  
  2015-06-09 16:58
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Ich nehme an, das ist $_
  Man kann die geschweiften Klammern benutzen, wenn sonst Anfang und Ende einer Variable nicht klar werden, z.B. in Regexen.
  
  Edit: Hier haben wir auch so ein Konstrukt gebaut: msg #174723
  Last edited: 2015-06-09 17:05:46 +0200 (CEST)
  10 print "Hallo"
  20 goto 10
- GwenDragon
  
  2015-06-09 17:08
  User since
  2005-01-17
  14890 Artikel
  Admin1
  Korrekt, das ist $_.
  
  Code (perl): (dl )
  
  1 2
  
  C:\ >perl -E "$_=99; say ${'_'}" 99
  
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- Raubtier
  
  2015-06-09 17:24
  User since
  2012-05-04
  1083 Artikel
  BenutzerIn
  Damit klar ist, wofür das gut ist:
  
  Code (perl): (dl )
  
  1 2 3 4
  
  my $hallo = "Hallo "; my $halloele = "Urks "; print "$halloele\n"; print "${hallo}ele\n";
  
  Das brauchst du z.B., wenn du eine Variable in einem doppelt gequoteten String hast und direkt dahinter ein ganz normaler Buchstabe folgen soll - Perl interpretiert "$halloele" als den Variablennamen $halloele, nicht als Variable $hallo mit dem String "ele" angehängst. Mit {...} kannst du das ändern.
- +7 replies
- GwenDragon
  
  2015-06-09 17:49
  User since
  2005-01-17
  14890 Artikel
  Admin1
  Stell dir vor, du willst folgendes machen, eine anglophone Ausgabe von Text mit einer Variable.
  Nämlich den Besitzer eines Hauses.
  Kein Problem, denkst du, geht doch so einfach:
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  use strict; use warnings; my $owner = "Jonny Walker"; print "This is $owner's home.";
  
  und erzeugt:
  Name "owner::s" used only once: possible typo at - line 1. Use of uninitialized value $owner::s in concatenation (.) or string at - line 1. This is home.
  
  Upps!? Nun ja. Klappt nicht so wie du willst.
  Warum?
  $owner's bedeutet in alten und jetzigem Perls $owner::s.
  
  Also wie dann?
  
  Einfach den Variablennamen herzen (klammern, embrace) in der Zeichenkette.
  So:
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  use strict; use warnings; my $owner = "Jonny Walker"; print "This is ${owner}'s home.";
  
  und das erzeugt:
  This is Jonny Walker's home.
  
  Gefahr erkannt, Gefahr gebannt.
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +4 replies
  - hlubenow
    
    2015-06-09 17:57
    User since
    2009-02-22
    885 Artikel
    BenutzerIn
    
    Nicht schlecht, obwohl meine erste Wahl
    
    Code (perl): (dl )
    
    print "This is $owner\'s home.";
    
    wäre. ;)
    - +3 replies
    - GwenDragon
      
      2015-06-09 18:08
      
      User since
      2005-01-17
      14890 Artikel
      Admin1
      
      Uh, das C-Imperium schlägt zurück. Backslasheritis ist eine grässliche Art und Weise. ;)
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - +2 replies
      - GUIfreund
        
        2015-06-09 18:31
        
        User since
        2011-08-08
        559 Artikel
        BenutzerIn
        
        2015-06-09T16:08:06 GwenDragon
        Uh, das C-Imperium schlägt zurück. Backslasheritis ist eine grässliche Art und Weise. ;)
        
        Geschmackssache. Mir gefällts immer noch besser als der Ausweg mittels {...}.
        
        Da wir grade von grässlichen Dingen reden: Ganz schlimm finde ich die Fehlermeldungen
        Quote
        Name "owner::s" used only once: possible typo at - line 1.
        Use of uninitialized value $owner::s in concatenation (.) or string at - line 1.
        
        So mancher Programmierer reibt sich verwundert die Augen. Auch Rücksicht auf Uralt-Kode sollte seine Grenzen haben.
        Gruß
        GUIfreund
        
        GwenDragon
        
        2015-06-09 18:34
        
        User since
        2005-01-17
        14890 Artikel
        Admin1
        
        Ja, manche Fehlermeldung muss in Perl erraten werden oder eineR muss genügend Erfahrung haben oder Perl-Magazin gelesen haben. ;)
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +2 replies
  - GUIfreund
    
    2015-06-09 18:07
    User since
    2011-08-08
    559 Artikel
    BenutzerIn
    
    oder:
    
    Code (perl): (dl )
    
    print "This is $owner\'s home.";
    
    Manchmal sollte man Uralt-Ballast endlich über Bord werfen.
    Gruß
    GUIfreund
    - GwenDragon
      
      2015-06-09 18:13
      
      User since
      2005-01-17
      14890 Artikel
      Admin1
      
      Ja, ich fand das schon vor Jahren grässlich.
      Aber der Trenner ' bei Modulen lebt auch in Perl 5.22 noch. Das muss wohl kompatibel sein, damit ol' grandma's Code von 2000 noch laufen kann.
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- lichtkind
  
  2015-06-09 18:56
  
  User since
  2004-03-22
  5730 Artikel
  ModeratorIn + EditorIn
  
  danke euch, man lernt nie aus,
  mein zeug:, Leute
  
  Es beginnt immer mit einer Entscheidung.

View all threads created 2015-06-09 16:31.