kleine Schönheitsfehler Ausbesserung (Allgemeines zu Perl)

[thread]20308[/thread]

kleine Schönheitsfehler Ausbesserung

Tags: perl5 Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+5 replies
Wild.Card

2017-06-18 13:47
User since
2017-02-27
19 Artikel
BenutzerIn
Hallo, ich habe da ein kleines Problemchen und zwar möchte ich es bewerkstelligen, dass die Anführungszeichen verschwinden.
Wenn ich die einfachen Anführungszeichen für den sklalaren Wert mit einschließe, wird jedoch dessen Varaible nicht mit eingeschlossen.
Gibt es da einen Trick?
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

# Interpolation von Elementen use warnings; my $email; $email = "E-Mail"; print "$email = adam@perl.edu \n"; # FEHLERANZEIGE: Possible unintended interpolation of @perl in string at C:\Strawberry\perl\interpolation.pl line 7. Global symbol "@perl" requires explicit package name (did you forget to declare "my @perl"?) at C:\Strawberry\perl\interpolation.pl line 7. # Execution of C:\Strawberry\perl\interpolation.pl aborted due to compilation errors. # Trick: Escape @perl durch backslash print "$email = adam\@perl.edu \n"; #Alternativ: print "$email = 'adam@perl.edu' "; #Ausgabe des Compilers: #adam.edu #adam@perl.edu #adam@perl.edu # Ein einzelnes Element eines Arrays wird zu seinen Wert interpoliert, genau wie man es bei einer skalaren Variablen erwarten würde my (@adam, $y, $x); @adam = qw(Hello Dolly); $y = 2; print $x = "\n Hier wohnt $adam[1]\n"; print $x = "Hier wohnt $adam[$y-1]";
- +4 replies
- hlubenow
  
  2017-06-18 14:12
  
  User since
  2009-02-22
  875 Artikel
  BenutzerIn
  
  Ich verstehe noch nicht genau, was Du meinst.
  Wo sollen die Anführungszeichen weg? Wie soll Deine Ausgabe aussehen?
  
  Wenn Du ein @ in einem String verwenden willst, wäre \@ wohl die beste Möglichkeit.
  - +3 replies
  - Wild.Card
    
    2017-06-18 18:46
    
    User since
    2017-02-27
    19 Artikel
    BenutzerIn
    
    Bei ln 19, da werden, wenn man das aus gibt die Anführungszeichen gezeigt aber ohne das @-Zeichen :
    
    E-Mail = adam.edu
    E-Mail = adam@perl.edu
    E-Mail = 'adam.edu'
    
    Wenn ich das jetzt ohne diese doppelten Anführungszecihen schreibe und stattdessen vor $email und am Ende die einfachen Anführungszeichen setze, erhalte ich:
    
    E-Mail = adam.edu
    E-Mail = adam@perl.edu
    $email = adam@perl.edu
    
    Sieht man jetzt was ich meine? Ich möchte das selbe für den dritten Ausdruck, wie beim zweitem, d.h : E-Mail = adam@perl.edu
    - +2 replies
    - Linuxer
      
      2017-06-18 19:09
      
      User since
      2006-01-27
      3870 Artikel
      HausmeisterIn
      
      Bei Dir fehlt in der Ausgabe durch Zeile 19 ja nicht nur das @, sondern das '@perl'.
      
      Solange Du "" verwendest, werden darin Variablen und das was wie eine solche ausschaut, interpoliert.
      Da helfen auch keine einfachen Hochkommata innerhalb des Strings.
      
      Wenn Du die Interpolation nicht willst, musst Du entweder '' verwenden oder das Sonderzeichen @ maskieren.
      
      Mögliche weitere Alternativen:
      
      print akzeptiert Listen; Du kannst also auch sowas machen:
      
      Code (perl): (dl )
      
      print $email, ' adam@example.org', "\n";
      
      Damit wird $email interpoliert, die Emailadresse mit vorangestelltem Leerzeichen wird als String gewertet, und als letztes Element wird ein Newline angefügt (\n funktioniert ebenfalls nicht innerhalb '').
      
      Oder Du schreibst die Adresse in eine eigene Variable und lässt diese interpolieren.
      
      Code (perl): (dl )
      
      1 2 3 4
      
      my $what = 'E-Mail'; my $email = 'adam@example.org'; print "$what = $email\n";
      
      Oder Du legst die Daten (vor allem wenn es mehr werden) in einem Hash ab:
      
      Code (perl): (dl )
      
      1 2 3 4 5 6 7
      
      my %data = ( 'E-Mail' => 'adam@example.org', ); while ( my ( $k, $v ) = each %data ) { print "$k = $v\n"; }
      
      Alle Varianten haben aber gemeinsam, dass Du Dich um das korrekte Quoting für die Email-Adresse über die genannten Maßnahmen selbst kümmern musst.
      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!
      - Wild.Card
        
        2017-06-18 21:08
        
        User since
        2017-02-27
        19 Artikel
        BenutzerIn
        
        Vielen Dank!

View all threads created 2017-06-18 13:47.