Thread Einbindende Zeichen und diese entfernen
(5 answers)
Opened by jan999 at 2010-07-23 15:35
Hi,
das kannst Du mit einer Regex direkt tun: Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 use strict; use warnings; my @texte = qw( {muster} {kein_muster ); for my $text ( @texte ) { $text =~ s/\A{(.*)}\z/$1/; print $text, $/; } PS(edit): Der enthaltene String (hier also "muster" und "kein_muster" darf hierbei keinen Zeilenumbruch enthalten (weil hier . kein Newline trifft); siehe http://perldoc.perl.org/perlre.html und pqs Antwort. Last edited: 2010-07-23 15:54:00 +0200 (CEST) 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! |