if (!defined @avail) { foreach (split /\n/, &get("https://$ENV{'HTTP_HOST'}/cgi-bin/booking.pl?command=check&st=$data{'st'}&ed=$data{'ed'}&force=$data{'force'}", $availability);) { chomp; my ($k, $v) = split/,/; $avail[$k] = $v; } } #### my $availability = LWP::Simple::get("https://$ENV{'HTTP_HOST'}/cgi-bin/booking.pl?command=check&st=$data{'st'}&ed=$data{'ed'}&force=$data{'force'}"); print "->$availability<-\n"; if (!defined @avail) { foreach (split /\n/, $availability) { chomp; my ($k, $v) = split/,/; $avail[$k] = $v; } } #### my $availability; my $response = LWP::Simple::getstore("https://$ENV{'HTTP_HOST'}/cgi-bin/booking.pl?command=check&st=$data{'st'}&ed=$data{'ed'}&force=$data{'force'}", $availability); print qq[("https://$ENV{'HTTP_HOST'}/cgi-bin/booking.pl?command=check&st=$data{'st'}&ed=$data{'ed'}&force=$data{'force'}")\n]; print "->$availability<-\n"; print "$response\n"; #### fetch('/api/', { method: 'POST', body: 'a=[% token %]&u=[% user %]&q=getWays&' + request, }).then(response => response.json()) .then(data => { document.getElementById('mapmsg').innerHTML = ''; if (data[0][0].status == 'success') { plotWays(data); } else { document.getElementById('timeoutbox').style.display='block'; } }) .catch(error => { console.log(error.message); });