From: Michael Andreen Date: Sun, 15 Jan 2023 12:34:31 +0000 (+0100) Subject: Workaround for the hidden 4th dimension X-Git-Url: https://ruin.nu/git/?p=ndwebbie.git;a=commitdiff_plain;h=a482ae605a2ecb265854e6a02672524bbae2ae7a Workaround for the hidden 4th dimension --- diff --git a/scripts/scans.pl b/scripts/scans.pl index 200e33f..89dd92c 100755 --- a/scripts/scans.pl +++ b/scripts/scans.pl @@ -113,7 +113,7 @@ sub parse_jumpgate { my ($scan,$file) = @_; $file =~ s/,//g; - while ($file =~ m{(\d+):(\d+):(\d+)\D+(Attack|Defend|Return)([^<]*)\D+(\d+)\D+(\d+)}g){ + while ($file =~ m{(\d+):(\d+):(\d+)(?::\d+)?\D+(Attack|Defend|Return)([^<]*)\D+(\d+)\D+(\d+)}g){ my ($sender) = $dbh->selectrow_array($findplanet,undef,$1,$2,$3,$scan->{tick}); ($sender) = $dbh->selectrow_array($findoldplanet,undef,$1,$2,$3,$scan->{tick}) if ((not defined $sender) && $4 eq 'Return');