Regulärer Ausdruck -> alles außer: Regulärer Ausdruck im Regulären Ausdruck - #73428 (Allgemeines zu Perl)

Crian

2003-11-30 15:08

User since
2003-08-04
5871 Artikel
ModeratorIn

[quote=renee,30.11.2003, 12:43]

Code: (dl )

1
2

my (@found) = $string =~ /(RegEx)/g;
print $_,"\n" for(@found);

ungetestet[/quote]

und was ist daran wohl besser als an

[quote=Crian,29.11.2003, 18:28]

Code: (dl )

1
2

$text =~ m~(MEINREGULÄRERAUSDRUCK)~;
$text = $1;

[/quote]

[quote=anti,30.11.2003, 13:03]Klasse - jetzt hat es funktioniert! Ich dachte so etwas hätte ich schon probiert - naja - Vielen Dank auf jeden Fall an alle Helfer!!

ciao[/quote]

Hmm dann hast Du meinen Vorschlag vorher nicht (richtig) ausprobiert ^^

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite