Habe Probleme mit regex Suchen und Ersetzen (Allgemeines zu Perl)

[thread]16587[/thread]

Habe Probleme mit regex Suchen und Ersetzen

Tags: perl5 Ähnliche Threads

Leser: 18

Articles: hide open all | hide show old branches

+4 replies
regex

2011-08-02 14:44
User since
2011-08-02
2 Artikel
BenutzerIn
Hallo Leute,

bin leider noch ein totaler Laie was regex angeht und hoffe daher mir kann jemand helfen oder einen Tip geben.

Mein Problem ist, dass ich einen Währungs Wert abfangen möchte und dies aber mehrere Formate haben kann.
Zum einen kommen Strings an, welche z. B. so aufgebaut sind: 800.00
Diese bearbeite ich dann mit folgender Anweisung und bekomme auch wie gewollt 800 zurück.
Code: (dl )

test =~ s/.00\ /\ /;
Jetzt habe ich aber das Problem, dass ich auch Zahlen zurück bekommen kann die z. B. 800.000 lauten und auch so bleiben sollen. Dort bekomme ich dann 800. als Ergebnis
Ich möchte nur wegschneiden wenn .00 steht.
Ich probiere jetzt schon seit Ewigkeiten und hoffe mir kann einer helfen. Danke
Last edited: 2011-08-02 15:02:56 +0200 (CEST)
- +3 replies
- pq
  
  2011-08-02 15:06
  
  User since
  2003-08-04
  12209 Artikel
  Admin1
  
  zunächst passt deine beschreibung nicht auf deine regex.
  s/.00\ /\ / ersetzt ein beliebiges zeichen, 2 nullen und ein leerzeichen durch ein leerzeichen.
  
  dein beispiel lautet aber 800.00. da ist gar kein leerzeichen.
  willst du vielleicht eher s/\.00\z//? also ein punkt \., 2 nullen 00 am ende des strings \z
  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
  - +2 replies
  - regex
    
    2011-08-02 15:14
    User since
    2011-08-02
    2 Artikel
    BenutzerIn
    
    Hallo pq,
    
    danke für deine Antwort. Meine Frage war scheinbar etwas schwer durchschaubar gestellt. Ich habe jetzt nach weiterem probieren selber eine Lösung gefunden.
    
    Code: (dl )
    
    $test =~ s/\.00$//
    
    Ist das so richtig?
    - renee
      
      2011-08-02 15:40
      
      User since
      2003-08-04
      14371 Artikel
      ModeratorIn
      
      Das ist "im Prinzip" das gleiche, das pq auch gepostet hat.
      
      Der Unterschied zwischen "\z" und "$" ist dieser hier:
      
      Code: (dl )
      
      1 2 3 4 5
      
      rb@ubuntu:~$ perl -le 'print "800.00\n" =~ /\.00$/' 1 rb@ubuntu:~$ perl -le 'print "800.00\n" =~ /\.00\z/' rb@ubuntu:~$
      
      Bei \z darf kein Zeilenumbruchkommen, bei $ schon.
      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/

View all threads created 2011-08-02 14:44.