# HG changeset patch # User Heiko Schlittermann (DTELE) # Date 1311841545 -7200 # Node ID 6c5ad12e1f2d9d0b802805ad8bb6bd40d6845f54 # Parent 49ff641055a36938c655d94a2e5b7da4c44ae50a added simple syntax test and some requires diff -r 49ff641055a3 -r 6c5ad12e1f2d Build.PL --- 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 ", 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, } diff -r 49ff641055a3 -r 6c5ad12e1f2d t/000-syntax.t --- /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; +}