Yet Another CPAN Grep

Bio-PhyloTastic ( R/RV/RVOSA/Bio-PhyloTastic-0.2.tar.gz, RVOSA, 2012; MetaCPAN )

Bio-PhyloTastic/lib/Bio/PhyloTastic/TNRS.pm ( view source; MetaCPAN )

package Bio::PhyloTastic::TNRS;
use strict;
use warnings;
use JSON;
use URI::Escape;
use Data::Dumper;
use LWP::UserAgent;
use Bio::Phylo::IO 'parse';
use Bio::Phylo::Util::CONSTANT ':objecttypes';
us

s is a redirect
	my $obj = decode_json($result);
	
	# start polling
	while(1) {
		sleep $wait;
		my $result = _fetch_url($obj->{'uri'},'get');
		my $obj = decode_json($result);
		if ( $obj->{'names'}