The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use Test::More;

BEGIN {
    my @modules = qw(
        Games::Snake
        Games::Snake::Level
        Games::Snake::Player
    );

    for my $module (@modules) {
        use_ok($module) or BAIL_OUT("Failed to load $module");
    }
}

diag(
    sprintf(
        'Testing Games::Snake %f, Perl %f, %s',
        $Games::Snake::VERSION, $], $^X
    )
);

done_testing();