From: Matt S Trout Date: Mon, 14 Nov 2011 17:44:30 +0000 (+0000) Subject: loading test X-Git-Tag: v0.001001~8 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ad0ce551a06a7d61065e4a6ccbc4908ac0e298e1;p=scpubgit%2FTak.git loading test --- diff --git a/t/00load_all.t b/t/00load_all.t new file mode 100644 index 0000000..79d8cdd --- /dev/null +++ b/t/00load_all.t @@ -0,0 +1,9 @@ +use strictures 1; +use Test::More qw(no_plan); +use IO::All; + +foreach my $file (io('lib')->all_files(0)) { + (my $name = $file->name) =~ s/^lib\///; + ok(eval { require $name; 1 }, "${file} loaded ok"); + warn $@ if $@; +}