X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=scripts%2Fstats.pl;h=432a5105b3761105f4bfe26272101e5f9b050079;hb=1645f2920350986aa64005704a841006a402f318;hp=6e9c8508e2332ca393162e366cc6b0392f781c5b;hpb=c7e26c754fc09d8837b5801bce4046c2493cf8a9;p=ndwebbie.git diff --git a/scripts/stats.pl b/scripts/stats.pl index 6e9c850..432a510 100755 --- a/scripts/stats.pl +++ b/scripts/stats.pl @@ -46,6 +46,8 @@ while ($file =~ /class="(\w+)">((?:\w| )+)<\/td>(\w+)<\/td>(\w+|-)<\ my $dmg = $10; $dmg = 0 if $dmg eq '-'; my $class = $classes{$3}; + my $type = $6; + $type = 'Emp' if $type eq 'EMP'; $st->execute($2,$class,$4,$5,'-',$6,$7,$8,$9,$dmg,$11,$12,$13,$14,$1) or die $dbh->errstr; print "$2,$class,$4,$5,'-',$6,$7,$dmg,$9,$10,$11,$12,$13,$14,$1\n"; }