HSCA schrieb:Torsten- schrieb:wenn du dich gut mit regulären ausdrücken auskennst
Probier mal folgendes (das rote ist neu, das blaue geändert):
##eval(
sub StatTeam {
my(%team,$cache);
foreach $cache (keys(%found)) {
if ($found{$cache}->{'Optional1'}) {
$found{$cache}->{'Optional1'} =~ s/\,//g
$found{$cache}->{'Optional1'} =~ s/mit//g
while ($found{$cache}->{'Optional1'} =~ m/(.*[^\s])/g){
$team{$1}++;
}
} else {
$team{'--ohne--'}++;
}
}
return(maketds(0,3,21,5,7,scalar(keys(%found)),pairsort(1,0,%team)));
}
StatTeam();
)##
Das ist aber grad aus dem Kopf zusammengebaut und nicht getestet. Ich mach leider zu wenig mit Perl um auf anhieb sagen zu können, ob das läuft![]()
Nur so nebenbei, das beruht auf der friedstat.incl. Die teamstat.incl sieht ein bisschen anders aus.
C
Das heißt, ich muss was machen? Ich möchte, das meine Teambeteiligung in der Statistik angezeigt wird, da steht jetzt nur "ohne" drin.