The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#! /usr/bin/perl -T

use strict;
use warnings FATAL => 'all';
use Test::Exception;
use Test::More tests => 2;

BEGIN { use_ok 'Test::Class' }

dies_ok { Test::Class->runtests( 'Not::A::Test::Class' ) } 
    'runtests dies if we are given something that is not a test class';