Alohá!
Habe folgendes Problem:
In einem String der eine geslurpte Datei enthält befindet sich eine Zeile
Stepnames=X_yz_a, WX_qr, agbsar_asd, asdefe, ABC_XYZ
Nun würde ich gern @orgsteps damit füllen. Durch
my @orgsteps = $ref =~ /^Stepnames=(?:(\w+),?\s?)*?$/gm;
wird nur das letzte match in @argsteps gefüttert, auch
my @orgsteps;
push @orgsteps, $1 while $ref =~ /^Stepnames=(?:(\w+),?\s?)*?$/gm;
liefert das selbe Ergebnis.
Gibt es keine Möglichkeit m// alle matches in list context zurückkommen zu lassen?
Was funktioniert ist natürlich
my @orgsteps;
while ($ref =~ /^Stepnames=(.*?)$/gm) {
my $match = $1;
push @orgsteps, split /[,\s]/, $match;
}
aber das ist nun nicht wirklich elegant...
drum&bass is a state of mind