The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/env perl -w
use strict;
use lib 't';
use Test::More tests => 1;
require 'mock.pl';

use Test::Continuous;
use Test::Continuous::Notifier;

{
    no warnings;
    sub Test::Continuous::_tests_to_run { ("t/diag.t") }
}

use Cwd qw(chdir);

chdir("t/SimpleApp");
Test::Continuous::_run_once;

my @notified = read_notifications();

is_deeply(
    \@notified,
    [
        "ALL PASSED\n",
        "t/diag.t:\n# Send a diag message",
    ]
);