From: Michael Andreen Date: Tue, 5 Feb 2008 10:04:55 +0000 (+0100) Subject: Parse structure killers properly X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=4d6601d7f712a82d93e6f286e929abaeef1e2608;p=ndwebbie.git Parse structure killers properly --- diff --git a/NDWeb/Pages/LaunchConfirmation.pm b/NDWeb/Pages/LaunchConfirmation.pm index 92217db..8c94dae 100644 --- a/NDWeb/Pages/LaunchConfirmation.pm +++ b/NDWeb/Pages/LaunchConfirmation.pm @@ -108,7 +108,7 @@ sub render_body { my $ships = $11; my @ships; my $amount = 0; - while ($ships =~ m/((?:\w+ )*\w+)\s+\w+\s+(?:(?:\w+|-)\s+){3}(?:Steal|Normal|Emp|Normal\s+Cloaked|Pod|Struc)\s+(\d+)/g){ + while ($ships =~ m/((?:\w+ )*\w+)\s+\w+\s+(?:(?:\w+|-)\s+){3}(?:Steal|Normal|Emp|Normal\s+Cloaked|Pod|Structure Killer)\s+(\d+)/g){ $amount += $2; push @ships,{Ship => $1, Amount => $2}; }