X-Git-Url: https://ruin.nu/git/?p=ndwebbie.git;a=blobdiff_plain;f=scripts%2Fparseplanets.pl;fp=scripts%2Fparseplanets.pl;h=bf5f2dc75c38998c87e642f5ec6bca2361a72232;hp=8866435d7fcdb6adce037b71bebf2e632a7d5b90;hb=3dc80cedd5deba53a4082992de317fbc3acf805c;hpb=23e133163ef06e0afc2000152df31c966f4929b2 diff --git a/scripts/parseplanets.pl b/scripts/parseplanets.pl index 8866435..bf5f2dc 100755 --- a/scripts/parseplanets.pl +++ b/scripts/parseplanets.pl @@ -45,7 +45,7 @@ if (@_ = $dumps->fetchrow){ $_ = $_[0]; $hour = (gmtime($_[1]))[2]; my $planetid = $dbh->prepare(q{SELECT find_planet_id($1,$2,$3,$4)}); - while (m/(\w+)\t(\d+)\t(\d+)\t(\d+)\t\"(.*)\"\t\"(.*)\"\t(Ter|Cat|Zik|Xan|Etd)\t(\d+)\t(\d+)\t(\d+)\t(\d+)/g){ + while (m/(\w+)\t(\d+)\t(\d+)\t(\d+)\t\"(.*)\"\t\"(.*)\"\t(\w+)\t(\d+)\t(\d+)\t(\d+)\t(\d+)/g){ $planetid->execute($1,$6,$5,$7); my @id = $planetid->fetchrow; push @planets,[$tick,$id[0],$2,$3,$4,$8,$9,$10,$11,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0];