From: Michael Andreen Date: Sun, 10 May 2009 14:28:01 +0000 (+0200) Subject: Converted .getscans X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=f4fda6de68d23833ffe61c81f29177cc210b3825;p=NDIRC.git Converted .getscans --- diff --git a/Commands/Scans.pm b/Commands/Scans.pm index 134629b..11f3337 100644 --- a/Commands/Scans.pm +++ b/Commands/Scans.pm @@ -26,6 +26,15 @@ use feature ':5.10'; use Moose; use MooseX::MethodAttributes; +sub getscans + : Help(syntax: .getscans X:Y:Z) + : Type(pm) +{ + my ($self,$c,$args) = @_; + my ($x,$y,$z) = $args =~ /(\d+)\D+(\d+)\D+(\d+)/ or die 'ARGS'; + $c->reply("https://nd.ruin.nu/stats/find/$x:$y:$z"); +} + my %scanid = (p => 1, l => 2, d => 3, u => 4, n => 5, j => 7, a => 8); my @scantypes = ('Planet','Landing', 'Development'