perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 27
Click for quality!




11.02.2012 / 20:25

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragRegular Expression - Replace
Seitenanfang
Hey leutz,
ich arbeite nun schon relativ lange hierdran,komme aber auf keine Lösung ;\
Angenommen ich habe $string = "A",und möchte durch eine Schleife jedes A durch $x++ ersetzen,wie würde ich das machen?

$string = "AA";
while ($i < 99) {
$i++;
$string =~s/AA/$i/ge;
print $string;
}

Ausgabe:
11111111111111111111111111111111111111111111111111111111111111111111111111111111
1111111111111111111

Eigl. sollte es sowas wie das hier sein:
(0)123456789...

Hat jemand vielleicht eine Lösung für das hier?

Datum: 11.10.2007-18:46

Beitragre: Regular Expression - Replace
Seitenanfang
meinst du so etwas?


use strict;

my $string = "Abends geht Achim zur Party";
my $i = 0;
while ( $string =~ /A/ ){
$i++;
$string =~ s/A/$i/;
}
print "$string\n";

Datum: 12.10.2007-08:14

Beitragre: Regular Expression - Replace
Seitenanfang
ne,nicht ganz...

$string = "hallo h";
while ($i < 99)
{
$i++;
$string =~ s/h/$i/;
print "$string\n";
}

sodass die ausgabe ungefähr so aussehe:
hallo 1
hallo 2
hallo 3
hallo 4

Datum: 12.10.2007-14:30

Beitragre: Regular Expression - Replace
Seitenanfang
Hallo

Wenn dein String wirklich 'hallo h' ist willst du das h am Ende durch die Zahl ersetzen.

$string =~ s/h$/$i/;

Man achte auf das Dollarzeichen "$" am Ende des zu ersetzenden Teil's und lese "perldoc perlre"

Gruss
Kristian

Datum: 14.10.2007-10:47

-






-
-