use Test;
BEGIN { plan tests => 3 }
use WWW::Search::Pagesjaunes;
my $pj = WWW::Search::Pagesjaunes->new();
ok(ref($pj), 'WWW::Search::Pagesjaunes');
ok($pj->limit, 50);
$pj->limit(100);
ok($pj->limit, 100);