--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/t/00-perl-c.t	Sun Jan 23 23:35:31 2011 +0100
@@ -0,0 +1,17 @@
+use v5.10;
+use strict;
+use warnings;
+
+use Test::More;
+use File::Find;
+
+plan skip_all => "no blib directories in \@INC"
+    if not /blib/ ~~ @INC;
+
+find(sub{
+    -f -x or return;
+    system("perl -Mblib -c $_ &>/dev/null");
+    is($? => 0, "syntax $File::Find::name");
+}, "blib/");
+
+done_testing;