,'Unit', 'News', 'Incoming', 'Jumpgate', 'Advanced Unit');
sub reqScan {
my ($msg, $command) = @_;
my ($x, $y, $z, $type, $typeid);
,'Unit', 'News', 'Incoming', 'Jumpgate', 'Advanced Unit');
sub reqScan {
my ($msg, $command) = @_;
my ($x, $y, $z, $type, $typeid);