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.