4a3f103195afff216604e84a30fc1d1ed4e0cf82 hiram Tue Feb 7 12:13:35 2023 -0800 indicate comments which server is which CGI no redmine diff --git src/hg/hubApi/tests/jsonConsumer.pl src/hg/hubApi/tests/jsonConsumer.pl index 364a716..0c5c0af 100755 --- src/hg/hubApi/tests/jsonConsumer.pl +++ src/hg/hubApi/tests/jsonConsumer.pl @@ -1,31 +1,34 @@ #!/usr/bin/env perl use strict; use warnings; use HTTP::Tiny; use Time::HiRes; use JSON; use Getopt::Long; # forward declaration sub performRestAction($$$); my $http = HTTP::Tiny->new(); # my $server = 'https://api.genome.ucsc.edu'; # my $server = 'https://apibeta.soe.ucsc.edu'; +# api-test is actually hgwdev.gi.ucsc.edu == genome-test.gi.ucsc.edu +# using /usr/local/apache/cgi-bin/hubApi my $server = 'https://api-test.gi.ucsc.edu'; +# hgwdev-api is using /usr/local/apache/cgi-bin-api/hubApi # my $server = 'https://hgwdev-api.gi.ucsc.edu'; my $globalHeaders = { 'Content-Type' => 'application/json' }; my $lastRequestTime = Time::HiRes::time(); my $processStartTime = Time::HiRes::time(); my $requestCount = 0; ############################################################################## # command line options my $endpoint = ""; my $hubUrl = ""; my $genome = ""; my $track = ""; my $chrom = ""; my $start = ""; my $end = "";