try fix velocloud

This commit is contained in:
garnier-quentin 2020-12-18 15:35:29 +01:00
parent 9bdf4ebe71
commit fdf410815f

View File

@ -281,7 +281,7 @@ sub get_entreprise_id {
endpoint => '/enterprise/getEnterprise' endpoint => '/enterprise/getEnterprise'
); );
$self->{entreprise_id} = int($response->{id}); $self->{entreprise_id} = $response->{id};
} }
sub list_edges { sub list_edges {
@ -292,7 +292,7 @@ sub list_edges {
my $response = $self->request_api( my $response = $self->request_api(
method => 'POST', method => 'POST',
endpoint => '/enterprise/getEnterpriseEdges', endpoint => '/enterprise/getEnterpriseEdges',
query_form_post => { enterpriseId => $self->{entreprise_id} } query_form_post => { enterpriseId => int($self->{entreprise_id}) }
); );
return $response; return $response;
@ -332,7 +332,7 @@ sub get_links_metrics {
method => 'POST', method => 'POST',
endpoint => '/metrics/getEdgeLinkMetrics', endpoint => '/metrics/getEdgeLinkMetrics',
query_form_post => { query_form_post => {
enterpriseId => $self->{entreprise_id}, enterpriseId => int($self->{entreprise_id}),
edgeId => $options{edge_id}, edgeId => $options{edge_id},
metrics => [ metrics => [
'bytesRx', 'bytesTx', 'bestJitterMsRx', 'bestJitterMsTx', 'bytesRx', 'bytesTx', 'bestJitterMsRx', 'bestJitterMsTx',
@ -390,7 +390,7 @@ sub get_apps_metrics {
method => 'POST', method => 'POST',
endpoint => '/metrics/getEdgeAppMetrics', endpoint => '/metrics/getEdgeAppMetrics',
query_form_post => { query_form_post => {
enterpriseId => $self->{entreprise_id}, enterpriseId => int($self->{entreprise_id}),
edgeId => $options{edge_id}, edgeId => $options{edge_id},
metrics => [ 'bytesRx', 'bytesTx', 'packetsRx', 'packetsTx' ], metrics => [ 'bytesRx', 'bytesTx', 'packetsRx', 'packetsTx' ],
interval => { interval => {
@ -413,7 +413,7 @@ sub get_links_qoe {
method => 'POST', method => 'POST',
endpoint => '/linkQualityEvent/getLinkQualityEvents', endpoint => '/linkQualityEvent/getLinkQualityEvents',
query_form_post => { query_form_post => {
enterpriseId => $self->{entreprise_id}, enterpriseId => int($self->{entreprise_id}),
edgeId => $options{edge_id}, edgeId => $options{edge_id},
debug => 'false', debug => 'false',
individualScores => 'false', individualScores => 'false',