Suchen und ersetzen (gelöst) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-12-27 07:34:10
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online

[thread]19058[/thread]

submit to reddit

Suchen und ersetzen [gelöst]

[gelöst]

Tags: perl5 Ähnliche Threads

Leser: 12

Articles: hide open all | hide show old branches

+3 replies
Gast Peter

2014-04-28 16:12
Hallo, ich habe ein Programmierproblem bei dem ich nicht weiterkomme. Ich habe einen String der immer so aufgebaut sein soll " dddddd/dddddd ". Jetzt kommt der String ziemlich oft ohne das Leerzeichen am Anfang und am Ende vor. Das zu lösen war nicht so schwierig.
Code: (dl )

if ( $feld =~ /(\d{6}\/\d{6})/i ) { $feld = " " .$1 . " "; }
Ich möchte jetzt auch alle die Werte ersetzen bei denen anstelle des Slash (zwischen den Zahlen) irgendein anderes Zeichen oder Leerzeichen steht. Z.B. soll "000234+123456" zu " 000234/123456 " werden.

LG, Peter
Last edited: 2014-04-28 16:49:46 +0200 (CEST)
- +2 replies
- murphy
  
  2014-04-28 16:53
  User since
  2004-07-19
  1776 Artikel
  HausmeisterIn
  Zum Beispiel könntest Du
  
  Code (perl): (dl )
  
  if ($feld =~ /(\d{6}).(\d{6})/) { $feld = " $1/$2 " }
  
  schreiben.
  When C++ is your hammer, every problem looks like your thumb.
  - Gast Peter
    
    2014-04-29 15:54
    
    Super Idee. Vielen Dank!
    
    LG
    Last edited: 2014-04-29 16:04:09 +0200 (CEST)

View all threads created 2014-04-28 16:12.