chomp (Allgemeines zu Perl) - Perl-Community.de

[thread]15678[/thread]

chomp

Leser: 20

Articles: hide open all | hide show old branches

+8 replies
Gast gast

2010-11-27 10:19
Mach dieser Code-Teil
Code (perl): (dl )

grep (($_ =~ s/[\r\n]+$//) && 0, @list);
das gleiche wie
Code (perl): (dl )

chomp( @list )
bzw. wozu dient das
Code (perl): (dl )

&& 0
?
Last edited: 2010-11-27 10:24:13 +0100 (CET)
- +3 replies
- lichtkind
  
  2010-11-27 11:15
  
  User since
  2004-03-22
  5681 Artikel
  ModeratorIn + EditorIn
  
  soweit an $/ nicht rumgespielt wurde ist es wirklich gleich, das && scheint zur änderung des rückgabewertes zu diene, wobei ich bisher nicht weiss das er sich ändert weil rückgabewert auch so 0 sein sollte da es anzahl der entfernten zeichen ist, oder gibt er -1 und das unerfünscht ist?
  Tutorien in der Wiki, mein zeug:
  kephra, baumhaus, garten, gezwitscher
  
  Es beginnt immer mit einer Entscheidung.
  - +2 replies
  - Gast wer
    
    2010-11-27 16:49
    "0 && 0 == 1" ist hier das wichtige.
    wenn keine Zeichen ersetzt wurden wäre der wert sonst 0 und damit würde der Wert nicht übernommen.
    besser ist es zu schreiben:
    
    Code (perl): (dl )
    
    @list=map(s/[\r\n]+$//, @list);
    
    Last edited: 2010-11-27 17:24:43 +0100 (CET)
    - pq
      
      2010-11-27 17:27
      
      User since
      2003-08-04
      12208 Artikel
      Admin1
      
      wenn man hinterher in @list nur noch einsen und leerstrings stehen haben will, wäre das richtig, ja.
      Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
      lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
- +3 replies
- ich
  
  2010-11-27 12:11
  User since
  2003-09-19
  120 Artikel
  BenutzerIn
  Hallo,
  
  ich verwende gerne ein aehnliches Konstrukt wie das grep. Da es vorkommen kann das man z.b. das Script auf einem Linux System mit
  
  Code (perl): (dl )
  
  $/ = "\n";
  
  laufen laesst, aber z.b. die input datei auf einem Windows System erzeugt wurde und dann die Lineendings
  
  Code: (dl )
  
  \r\n
  
  hat.
  If you tell the truth you don't have to remember anything.
  -- Mark Twain
  - +2 replies
  - Linuxer
    
    2010-11-27 20:40
    User since
    2006-01-27
    3875 Artikel
    HausmeisterIn
    
    Warum verwendest Du kein for für solche Sachen?
    Was ist am grep besser?
    
    Code (perl): (dl )
    
    s/[\r\n]+$// for @lines;
    
    Ansonsten könnte man auch $/ lokalisiert auf den gewünschten Wert setzen, sodass chomp() auch den gewünschten "richtigen" Zeilenumbruch entfernt.
    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!
    - ich
      
      2010-11-27 20:56
      
      User since
      2003-09-19
      120 Artikel
      BenutzerIn
      
      Ich sage ja, "ein aehnliches" Konstrukt ;-)
      
      $/ kann man zwar auf das setzen was man gerade braucht, aber wenn man eine Datei hat bei der man das Zeilenende nicht kennt, oder einfach auch variiert, weil man die Datei nicht selbst generiert dann klappt das selbst ersetzen besser/zuverlaessiger.
      If you tell the truth you don't have to remember anything.
      -- Mark Twain
- Gast gast
  
  2010-11-27 12:15
  
  thx!
  Last edited: 2010-11-27 12:22:17 +0100 (CET)

View all threads created 2010-11-27 10:19.