regular expression frage (Allgemeines zu Perl)

[thread]16023[/thread]

regular expression frage

Leser: 24

Articles: hide open all | hide show old branches

+4 replies
Gast David

2011-03-01 13:57

Hallo zusammen

Ich habe in einem Textfile folgende Zeichenkette:
2011-03-01_09:41.50;2011-03-01_09:44.37

Daraus möchte ich machen:
2011-03-01;09:41.50;2011-03-01;09:44.37

Leider kann ich nicht einfach den underscore durch Strichpunkt ersetzen, da weiter hinten auf der Zeile noch weitere underscores vorkommen..

Ich brauche etwas in dieser Art:
my $find7 = '\d\d_\d\d';
my $replace7 = '\d\d;\d\d';
s/$find7/$replace7/ig;

Also ein Test, wo zwei Zahlen danach Underscore und dann nochmals zwei Zahlen kommen.
Aber dieser Code gibt mir dann das zurück:
2011-03-\d\d;\d\d:41.50;2011-03-\d\d;\d\d:44.37

Wie bringe ich Perl dazu, dass mir statt die \d, die ursprünglichen Zahlen wieder rausgibt?

Vielen Dank für eure Hilfe.

Gruss,
David
Last edited: 2011-03-01 13:59:08 +0100 (CET)
- +3 replies
- Linuxer
  
  2011-03-01 14:02
  User since
  2006-01-27
  3871 Artikel
  HausmeisterIn
  Der Replace-Teil gilt so wie er geschrieben ist. Du hast '\d\d' drin stehen, also wird das auch für den Suchtreffer eingesetzt. Du kannst z.B. die Zahlen einfangen und dann wieder einsetzen:
  
  Code (perl): (dl )
  
  $text =~ s/(\d\d)_(\d\d)/$1;$2/g;
  
  Last edited: 2011-03-01 14:39:50 +0100 (CET)
  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!
  - +2 replies
  - Gast David
    
    2011-03-01 14:13
    
    Oder gibt es eventuell eine Möglichkeit, die ersten 5 Underscores einer Zeile mit einem Strichpunkt zu ersetzen?
    
    Vielen Dank und Gruss,
    David
    Last edited: 2011-03-01 14:14:33 +0100 (CET)
    - FIFO
      
      2011-03-01 14:19
      
      User since
      2005-06-01
      469 Artikel
      BenutzerIn
      
      Code (perl): (dl )
      
      $string = join ';', split('_', $string, 6);
      
      Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"

View all threads created 2011-03-01 13:57.