Don't catch bad planet names

diff --git a/scripts/scans.pl b/scripts/scans.pl
index 01560796b13a5ae9cffa733f01cf42596cb69c7f..654859a2508e9fffded65c509413ea2a6633dcce 100755 (executable)
--- a/scripts/scans.pl
+++ b/scripts/scans.pl
@@ -106,7 +106,7 @@ while (my $scan = $newscans->fetchrow_hashref){
                }
                if ($type eq 'Planet'){
                        $file =~ s/(\d),(\d)/$1$2/g;
-                       while($file =~ m/(Metal|Crystal|Eonium)\D+(\d+)\D+(\d+)/g){
+                       while($file =~ m/"left">(Metal|Crystal|Eonium)\D+(\d+)\D+(\d+)/g){
                                $addpdata->execute($planet,$tick,$scan->{id}
                                        ,'roid',$1, $2) or die $dbh->errstr;
                                $addpdata->execute($planet,$tick,$scan->{id}