The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

# t/02basic.t

use Test::More tests => 4;

use WWW::CPAN ();

{
    my $c = WWW::CPAN->new();
    isa_ok( $c, 'WWW::CPAN' );

    can_ok( $c, 'fetch_distmeta' );
    can_ok( $c, 'search' );
    can_ok( $c, 'query' );
}