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

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

2024-12-01 06:38:20
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online
3 Gäste

[thread]14875[/thread]

submit to reddit

Substitutionen

Leser: 14

Articles: hide open all | hide show old branches

+3 replies
Gast Tom

2010-03-27 18:23

Hallo!

Ich würde gerne in einem $text ein bestimmtes Zeichen (das " in meinem Fall) abwechselnd durch einen String ersetzen lassen ("` bzw. "'). Vielleicht eine blöde Frage, aber wie mache ich das?!

THX!

Tom
Last edited: 2010-03-27 18:24:56 +0100 (CET)
- +2 replies
- pq
  
  2010-03-27 18:27
  User since
  2003-08-04
  12208 Artikel
  Admin1
  Code (perl): (dl )
  
  1 2 3
  
  my @quotes = qw/ ` ' /; my $i = 0; $string =~ s/"/$quotes[$i++ % 2]/g;
  
  edit: /e entfernt, geht auch ohne
  Last edited: 2010-03-27 18:31:08 +0100 (CET)
  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
  - Gast Tom
    
    2010-03-27 19:06
    
    Wow, genial!! Und so schnell! Ich bin begeistert! Funktioniert perfekt! Das hatte mich den halben Nachmittag gekostet...
    
    Vielen, vielen Dank!
    
    Tom
    Last edited: 2010-03-27 19:08:23 +0100 (CET)

View all threads created 2010-03-27 18:23.