Yet Another CPAN Grep

AnyEvent-MQTT ( B/BE/BEANZ/AnyEvent-MQTT-1.212810.tar.gz, BEANZ, 2021; MetaCPAN )

AnyEvent-MQTT/misc/t/Tester.pm ( view source; MetaCPAN )

t::MQTT::Constants;
use JSON;
use File::Slurp;
use Test::SharedFork;

sub run {
  my ($pkg, $file) = @_;

  my $json = JSON->new;
  my $data = read_file($file);
  $data = $json->decode($data);
  my $c