Alles vorm "<" entfernen? (Allgemeines zu Perl)

[thread]14538[/thread]

Alles vorm "<" entfernen?

Leser: 20

Articles: hide open all | hide show old branches

+9 replies
Brenner

2010-01-25 08:00
User since
2009-01-13
87 Artikel
BenutzerIn
String ist:

Quote
lalalalala <abc>

Ich möchte alles was ab "<" steht behalten und alles davor weg haben.

substr sollte dafür ja funktionieren
Code: (dl )

$a=substr($a,<)
Geht aber nicht.
Last edited: 2010-01-25 08:19:39 +0100 (CET)
- +8 replies
- MatthiasW
  
  2010-01-25 08:11
  User since
  2008-01-27
  367 Artikel
  BenutzerIn
  Es funktioniert so nicht, weil du substr() falsch verwendest:
  
  perldoc -f substr
  substr EXPR,OFFSET,LENGTH,REPLACEMENT
  
  In deinem Fall wäre des OFFSET 0 und die Länge bekommst du mittels index():
  
  Code (perl): (dl )
  
  1 2 3
  
  my $x = 'lalala <abc>'; substr( $x, 0, index( $x, '<' ), '' ); print $x, "\n"; # gibt <abc>
  
  MfG
  perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
  - +7 replies
  - Brenner
    
    2010-01-25 08:41
    
    User since
    2009-01-13
    87 Artikel
    BenutzerIn
    
    Danke, klappt einwandfrei.
    
    kann ich es trotzdem nochmal zum Verständnis durchgehen?
    
    $x = Der String eben
    0 = Ab wo es gilt bzw. ab wo geschaut werden soll?
    index( $x, '<' ) = Ist ja die Länge vom substr. Was genau macht "index". Kannte ich bis eben noch gar nicht.
    '' = Alles, von hinten gezählt, ab der Länge wird mit nichts ersetzt?
    
    Kommt das so hin?
    - +4 replies
    - bianca
      
      2010-01-25 08:48
      
      User since
      2009-09-13
      7016 Artikel
      BenutzerIn
      
      2010-01-25T07:41:54 Brenner
      $x = Der String eben
      0 = Ab wo es gilt bzw. ab wo geschaut werden soll?
      index( $x, '<' ) = Ist ja die Länge vom substr. Was genau macht "index". Kannte ich bis eben noch gar nicht.
      '' = Alles, von hinten gezählt, ab der Länge wird mit nichts ersetzt?
      
      index() sucht einen String in einem anderen String, gib mal perldoc -f index in Deiner Konsole ein.
      Das letzte '' im substr() ist optional. Könnte man in dem Fall auch weglassen, weil eine Ersetzung durch '' ja eh nichts tut.
      Wurde wahrscheinlich von Matti erwähnt, um Dir als Lernender eine vollständige Syntax zu zeigen.
      Rest haste richtig wiedergegeben.
      10 print "Hallo"
      20 goto 10
      - +2 replies
      - murphy
        
        2010-01-25 09:08
        
        User since
        2004-07-19
        1776 Artikel
        HausmeisterIn
        
        Selbstverständlich hat eine Ersetzung eines Substrings durch den leeren String einen Effekt, nämlich dass der Substring gelöscht wird.
        
        Gerade in diesem Beispiel ist der Effekt auch essentiell für die gewünschte Funktion des Codes!
        When C++ is your hammer, every problem looks like your thumb.
        
        bianca
        
        2010-01-25 09:55
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        2010-01-25T08:08:41 murphy
        Selbstverständlich hat eine Ersetzung eines Substrings durch den leeren String einen Effekt, nämlich dass der Substring gelöscht wird.
        
        Gerade in diesem Beispiel ist der Effekt auch essentiell für die gewünschte Funktion des Codes!
        
        Ach klar, ich doof.
        Logisch.
        Sorry, hab mich vertan!
        10 print "Hallo"
        20 goto 10
      - renee
        
        2010-01-25 09:09
        
        User since
        2003-08-04
        14371 Artikel
        ModeratorIn
        
        2010-01-25T07:48:13 bianca
        Das letzte '' im substr() ist optional.
        richtig
        2010-01-25T07:48:13 bianca
        Könnte man in dem Fall auch weglassen, weil eine Ersetzung durch '' ja eh nichts tut.
        falsch. Es ersetzt eben von 0 bis zum Index alles durch ''.
        
        2010-01-25T07:48:13 bianca
        Wurde wahrscheinlich von Matti erwähnt, um Dir als Lernender eine vollständige Syntax zu zeigen.
        Rest haste richtig wiedergegeben.
        
        Vergleiche:
        
        Code: (dl )
        
        perl -le 'my $var = "hallo"; substr( $var, 0, 1 ); print $var; substr( $var, 0, 1, ""); print $var'
        
        OTRS-Erweiterungen (http://feature-addons.de/)
        Frankfurt Perlmongers (http://frankfurt.pm/)
        --
        
        Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
        Perl-Entwicklung: http://perl-services.de/
    - +2 replies
    - murphy
      
      2010-01-25 09:05
      
      User since
      2004-07-19
      1776 Artikel
      HausmeisterIn
      
      2010-01-25T07:41:54 Brenner
      [...]
      $x = Der String eben
      
      Korrekt.
      
      Quote
      0 = Ab wo es gilt bzw. ab wo geschaut werden soll?
      
      Korrekt, das ist die Anfangsposition des Substrings im String.
      
      Quote
      index( $x, '<' ) = Ist ja die Länge vom substr. Was genau macht "index". Kannte ich bis eben noch gar nicht.
      
      Dieser Parameter von substr legt die Länge des Substrings fest. Mit index wird die Position von '<' im ursprünglichen String ermittelt.
      
      Quote
      '' = Alles, von hinten gezählt, ab der Länge wird mit nichts ersetzt?
      
      Alles vom Anfang bis zum Ende des ausgewählten Substrings wird durch den leeren String ersetzt.
      
      Zusammengefasst bedeutet der komplette Befehl: Suche die Position des ersten Auftretens von '<' in $x und lösche alles bis zu dieser Position.
      
      Anstatt $x destruktiv zu verändern könnte man auch den Substring ab der gesuchten Position selektieren, etwa so:
      
      Code (perl): (dl )
      
      my $y = substr $x, index($x, '<');
      
      Falls nicht garantiert ist, dass $x überhaupt ein '<' enthält, sollte man ferner zunächst den Rückgabewert von index prüfen, bevor man ihn an substr weiterreicht.
      When C++ is your hammer, every problem looks like your thumb.
      - Brenner
        
        2010-01-25 09:13
        
        User since
        2009-01-13
        87 Artikel
        BenutzerIn
        
        DANKE euch.
        
        Alle relevanten Zeilen fangen immer mit "<" an, daher quasi perfekt.
        
        Jetzt muss ich nur noch ein Blockleseproblem erledigen aber dafür mache ich ggf. einen neuen Thread auf falls ich es selbst nicht schaffe.

View all threads created 2010-01-25 08:00.