remove relicate

test/remote/get_companies.pl

-#!/usr/bin/perl
-
-my $country_code="fr"
-
-print "La documentation de l'api est disponible ici : http://api.opencorporates.com/documentation/API-Reference";
-
-# Édition logiciel
-#curl curl https://api.opencorporates.com/v0.4/industry_codes/fr_naf_2008/58.29B
-#curl https://api.opencorporates.com/v0.4.1/companies/search?industry_codes=fr_naf_2008&country_code=fr;
-#https://api.opencorporates.com/v0.4/companies/search?q=traxis&country_code=fr

test/remote/test.pl

 
 use NRT::User;
 use NRT::Batch;
-#require NRT::User;
-#require NRT::Batch;
 
 print User::v ;
 read_config 'test.cfg' => our %config; 
-
-our $url = "$config{Authentification}{Protocol}$config{Authentification}{Host}$config{Authentification}{Path}";;
-local $ua = LWP::UserAgent->new(timeout => 10);
-$ua->env_proxy;
-
 our $batch = Batch->new( %config );
 print "\nMaking all tests\n";
-#NRT::Basic::rq_empty;
 
-#Test::init;
-#Batch::brief;
-#Batch::run();
 $batch->run();