Im String an verschiedenen Stellen arbeiten (gelöst) - #167204 (Allgemeines zu Perl)

Linuxer

2013-04-23 14:27

User since
2006-01-27
3881 Artikel
HausmeisterIn

user image

Das ginge z.B. mit globalem Regex-Matching und einer While-Schleife:

Code (perl): (dl )

#! /usr/bin/perl
use strict;
use warnings;

my $string = "bla: foo,1234 bar,5678";

while ( $string =~ m{,(\w\w\w\w)}g ) {
  print "Match: $1\n";
}

Oder Du speicherst alle Treffer in einem Array:

Code (perl): (dl )

#! /usr/bin/perl
use strict;
use warnings;

my $string = "bla: foo,1234 bar,5678";

my @captures = $string =~ m{,(\w\w\w\w)}g;

print "Matches: @captures\n";

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!