api sigo_available get

This commit is contained in:
Rainer Gümpelein 2022-03-31 21:53:53 +02:00
parent 2a9099acd2
commit 381943be42
8 changed files with 166 additions and 96 deletions

View file

@ -25,12 +25,15 @@ my $si = new APIsigoclient;
my $bw = new Basework;
my $lang = "de";
my $now_dt = strftime "%Y-%m-%d %H:%M:%S", localtime;
my %varenv = $cf->envonline();
my $todo = $ARGV[1];
if($todo eq "get_bikes"){
my $return = $si->get_bikes("https://shareeapp-sx.copri-bike.de");
print Dumper($return);
$q->param(-name=>'request',-value=>"bikes_available");
my $auth = { c_id => 0 };
my $return = $si->sigo_available($q,\%varenv,$auth);
print $0 . Dumper($return) . "\n";
}