6 use POSIX qw/SIGINT SIGTERM SIGKILL SIGHUP EXIT_FAILURE/;
8 use lib qw{blib/lib t/lib};
10 use IPC::MorseSignals::TestSuite qw/init bench cleanup/;
12 my $diag = sub { print STDERR "@_\n" };
17 bench 4, 1, $diag, \@res;
18 bench 4, 4, $diag, \@res;
19 bench 4, 16, $diag, \@res;
20 bench 4, 64, $diag, \@res;
21 bench 4, 256, $diag, \@res;
22 bench 16, 1, $diag, \@res;
23 bench 16, 4, $diag, \@res;
24 bench 16, 16, $diag, \@res;
25 bench 16, 64, $diag, \@res;
26 bench 64, 1, $diag, \@res;
27 bench 64, 4, $diag, \@res;
28 bench 64, 16, $diag, \@res;
29 bench 256, 1, $diag, \@res;
30 bench 256, 4, $diag, \@res;
31 bench 1024, 1, $diag, \@res;
35 print STDERR "=== Summary ===\n";
36 print STDERR "$_\n" for @res;