For anyone interested, this is what I ended up doing. Any suggestions are very welcome

This is for the waveapps api

#!/usr/bin/env perl

require LWP::UserAgent;

use JSON;
use Data::Dumper;


my $uri = 'https://gql.waveapps.com/graphql/public';
my $json = <<'EOF';
{"query": "query ($businessId: ID!, $page: Int!, $pageSize: Int!) {
  business(id: $businessId) {
    id
    products(page: $page, pageSize: $pageSize) {
      
      edges {
        node {
          id
          name
          description
          unitPrice
          defaultSalesTaxes {
            id
            name
            abbreviation
            rate
          }

        }
      }
    }
  }
}
", "variables" : { "businessId": "ENTER_BUSINESS_ID_HERE", "page": 1, 
+"pageSize": 500 }
}
EOF

# remove newlines
$json =~ s/(\n|\r)//g;

my $req = HTTP::Request->new( 'POST', $uri );
$req->header( 'Content-Type' => 'application/json', 'Authorization' =>
+ 'Bearer ENTER_BEARER_TOKEN_HERE');
$req->content( $json );

my $lwp = LWP::UserAgent->new;
my $res = $lwp->request( $req );

$data = decode_json($res->content);
print  Dumper($data);
[download]