From: Michael Andreen Date: Sun, 2 Sep 2007 10:46:52 +0000 (+0200) Subject: BUGFIX: Apparently pa team allows empty ruler names X-Git-Url: https://ruin.nu/git/?p=ndwebbie.git;a=commitdiff_plain;h=2dc71e3dea5b9e14bdb1e069d23d373658a11dcb BUGFIX: Apparently pa team allows empty ruler names --- diff --git a/scripts/parsedumps.pl b/scripts/parsedumps.pl index e02c46b..f1738bf 100755 --- a/scripts/parsedumps.pl +++ b/scripts/parsedumps.pl @@ -113,7 +113,7 @@ if (@_ = $dumps->fetchrow){ $_ = $_[0]; $hour = (gmtime($_[1]))[2]; my $planetid = $dbh->prepare(qq{SELECT findplanetid(?,?,?)}); - while (m/(\d+)\t(\d+)\t(\d+)\t\"(.+)\"\t\"(.+)\"\t(Ter|Cat|Zik|Xan|Etd)\t(\d+)\t(\d+)\t(\d+)\t(\d+)/g){ + while (m/(\d+)\t(\d+)\t(\d+)\t\"(.*)\"\t\"(.*)\"\t(Ter|Cat|Zik|Xan|Etd)\t(\d+)\t(\d+)\t(\d+)\t(\d+)/g){ $planetid->execute($5,$4,$6); my @id = $planetid->fetchrow; push @planets,[$tick,$id[0],$1,$2,$3,$7,$8,$9,$10,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0];