t/01compile.t


1
2
3
4
5
6
7
8
9
10
11
12

#!/usr/bin/perl

use strict;
use warnings;
no warnings 'redefine';
use Test::More tests => 10;

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