blob: b647b915d4bfe90f9e8044b1192028346c1748e0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
#!/usr/bin/perl
use Test;
my @progs=grep { -x $_ } glob("dh_*");
my @libs=glob("Debian/Debhelper/*.pm");
plan(tests => (@progs + @libs));
foreach my $file (@progs, @libs) {
ok(system("perl -c $file >/dev/null 2>&1"), 0);
}
|