heredoc in Variablendefinition (gelöst) (Allgemeines zu Perl)

[thread]15758[/thread]

heredoc in Variablendefinition [gelöst]

Leser: 22

Articles: hide open all | hide show old branches

+8 replies
bianca

2010-12-19 10:37
User since
2009-09-13
7016 Artikel
BenutzerIn
Guten Morgen!

Möchte innerhalb einer Hash-Definition die folgende Syntax verwenden aber das gibt natürlich Syntax-Error. Ich weiß nicht, wie man das nennt, wenn man mit <<HTML_TEIL; und HTML_TEIL umschließt.

Wie schreibt man das richtig?

Danke Euch
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10

my $hash = ( 1 => { name => 'name, name', beschreib_html => <<HTML_TEIL; <ul> <li>ganz viel text</li> </ul> HTML_TEIL, }, );
10 print "Hallo"
20 goto 10
- +7 replies
- MatthiasW
  
  2010-12-19 11:01
  User since
  2008-01-27
  367 Artikel
  BenutzerIn
  Das nennt sich heredoc und wird nicht mit der Zeichenfolge <<XXX; gestartet, sondern ohne Semikolon. Ab der nächsten Zeile folgt dann der Text, den man quoten möchte. Mit XXX wird das heredoc abgeschlossen. In deinem Code steht hinter HTML_TEIL beim Öffnen des heredocs ein Semikolon, welches du entweder entfernen, oder mit einem Komma tauschen solltest. Beim Schließen des heredocs steht in deinem Code ein Komma, welches dort nicht hingehört:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12
  
  my $hash = ( 1 => { name => 'name, name', beschreib_html => <<HTML_TEIL, option => 'value', #... <ul> <li>ganz viel text</li> </ul> HTML_TEIL option2 => 'value2', #... }, );
  
  edit: Darüber hinaus ist zu beachten, dass du hier ein HereDoc mit Variablenersetzung benutzt. Falls du hier keine Ersetzung benötigst, solltest du das HereDoc mit single-quotes starten: <<'HTML_TEIL'
  
  MfG
  Last edited: 2010-12-19 11:04:07 +0100 (CET)
  perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
  - +6 replies
  - bianca
    
    2010-12-19 11:08
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    Jau, das wars. Danke Dir!
    
    übrigens sehe ich das öfter mit Semikolon gestartet und funktioniert auch, wenn es nicht in diesem Kontext gemacht wird.
    Ist dann wohl nur "unsauber", oder?
    10 print "Hallo"
    20 goto 10
    - +5 replies
    - MatthiasW
      
      2010-12-19 11:17
      
      User since
      2008-01-27
      367 Artikel
      BenutzerIn
      
      Nein das Semikolon ist dazu da das Statement, zu dem das HereDoc gehört abzuschließen. Stell dir vor das <<XXX wird durch den String ersetzt, der gequotet wird. (Natürlich mit entsprechenden Anführungszeichen.) Das Statement zu dem das HereDoc gehört, ist aber nicht automatisch mit dem Öffnen des HereDocs abgeschlossen. Um auch das Statement abzuschließen benötigt man ein Semikolon.
      
      Beispiele:
      
      Code (perl): (dl )
      
      1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
      
      <<'XXX' XXX ; # hier ist das Statement vorbei <<'XXX'; # hier ist das Statement vorbei XXX <<'XXX', anderes => 'zeug'; # praktisch in Funktionsaufrufen XXX <<'XXX'; anderes_zeug(); XXX <<'XXX'; <<'YYY'; XXX YYY
      
      Ich hoffe ich habs verständlich erklären können.
      
      MfG
      perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
      - +4 replies
      - bianca
        
        2010-12-19 11:49
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        Ganz ehrlich hab ich den Unterschied zwischen den ersten beiden Beispielen noch nicht verstanden.
        Was ändert sich, wenn das Semikolon hinter dem ersten oder unter dem zweiten steht?
        10 print "Hallo"
        20 goto 10
        
        topeg
        
        2010-12-19 12:31
        
        User since
        2006-07-10
        2611 Artikel
        BenutzerIn
        
        Eine Definition eines Heredoc Trenners gilt vom "<<" bis zum ersten "normalen" Trennzeichen. Das ist normalerweise ein "\W"-Zeichen. Etwas anders werden noch gequotete Heredoc Trenner gehandhabt. dort gilt alles innerhalb der " oder ' als Trenner.
        
        Beispiel:
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
        
        #!/usr/bin/perl use strict; use warnings; my $txt1=<<"DAS ist DAS ende!"; Bla bla bla DAS ist DAS ende! my $txt2=<<"`rm -rf /$_` for (qw(home usr bin sbin));"; Und es passiert nichts! ;-) `rm -rf /$_` for (qw(home usr bin sbin)); my $txt3=<<'my $x="Das ist nur ein test"'; # ein echter Kommentar Bla und so my $x="Das ist nur ein test" print "$txt1\n\n$txt2\n\n$txt3\n\n"; print <<TEST for(0..10); test TEST
        
        MatthiasW
        
        2010-12-19 12:32
        
        User since
        2008-01-27
        367 Artikel
        BenutzerIn
        
        Es ändert sich die Position, an der das Statement abgeschlossen ist. Der Punkt ist, dass auf das Öffnen eines HereDocs noch Code folgen kann.
        
        Code (perl): (dl )
        
        1 2
        
        f( <<'XXX', option => 'value', option2 => 'value2', ... ); XXX
        
        Das hat den Vorteil, dass es den Funktionsaufruf so nicht auseinander reißt, wenn hinter dem HereDoc noch Argumente folgen. Das ist auch der Vorteil das Statement, zu dem das HereDoc gehört, noch in der selben Zeile abzuschließen; dann steht das Semikolon nicht aus dem Zusammenhang gerissen dar.
        
        MfG
        perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
        
        bianca
        
        2010-12-19 13:14
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        OK, habs verstanden. Danke Euch beiden!
        10 print "Hallo"
        20 goto 10

View all threads created 2010-12-19 10:37.