11 local $SIG{__WARN__} = sub {
13 if ($msg =~ /^You're_using CPAN Authors are not registered yet: (.*)/s) {
18 Acme::CPANAuthors->new("You're_using");
27 my $count = $authors->count;
28 diag "$count authors found";
29 cmp_ok $count, '>', 0, 'there are some authors';
31 is $authors->name('???'), undef, 'wrong name';
32 is $authors->name('VPIT'), 'Vincent Pit', 'we should at least have this module';
33 isnt $authors->name('ISHIGAKI'), undef, 'we should at least have Acme::CPANAuthors\' author';
34 isnt $authors->name('GAAS'), undef, 'we should at least have LWP\'s author';