view release on metacpan or  search on metacpan

misc/test-server  view on Meta::CPAN

#!/usr/bin/perl
use warnings;
use strict;
use FindBin;
use Test::Harness;
my @files = @ARGV;
@files = glob($FindBin::Bin.'/t/*.t') unless (@files);
$ENV{ANYEVENT_MQTT_SERVER} = '127.0.0.1'
  unless (exists $ENV{ANYEVENT_MQTT_SERVER});
runtests(@files);