t/01compile.t


1
2
3
4
5
6
7
8
9
10
11

#!/usr/bin/perl

use strict;
use warnings;
use Test::More tests => 20;

for my $module (glob("urpm/*.pm")) {
    $module =~ s,/,::,g;
    $module =~ s,\.pm$,,;
    use_ok $module;
}