--- a/Build.PL Thu Jul 28 10:03:15 2011 +0200
+++ b/Build.PL Thu Jul 28 10:25:45 2011 +0200
@@ -8,6 +8,9 @@
dist_author => "Heiko Schlittermann <hs\@schlittermann.de>",
requires => {
perl => "5.0.10",
+ "autodie" => "2.06_01",
+ "IPC::System::Simple" => "1.21",
+ "Fuse" => "0.09",
"IO::Uncompress::Gunzip" => 0,
"IO::Compress::Gzip" => 0,
}
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/t/000-syntax.t Thu Jul 28 10:25:45 2011 +0200
@@ -0,0 +1,16 @@
+use 5.010;
+use strict;
+use warnings;
+use Test::More;
+
+use File::Find;
+
+my @scripts;
+find(sub { push @scripts, $File::Find::name if -f and -x }, "blib");
+
+plan tests => scalar @scripts;
+
+foreach (@scripts) {
+ my $e = `perl -c $_ 2>&1`;
+ ok(!$?, "syntax ok") or diag $e;
+}