Select Code to Download

#! /usr/bin/perl -W

...
        print Dumper $token_request;
    }
}

Bareword "Types::Serialiser::Error::" refers to nonexistent package at
+ /usr/share/perl5/Types/Serialiser.pm line 136.
Bareword "Types::Serialiser::Error::" refers to nonexistent package at
+ /usr/share/perl5/Types/Serialiser.pm line 147.
...
                       'message' => 'Access token validation failure. 
+Invalid audience.'
                     }
        };

curl -X GET -H "Authorization: Bearer [TOKEN]" -H "Content-Type: appli
+cation/json" https://management.azure.com/subscriptions/[SUBSCRIPTION
+_ID]/providers/Microsoft.Web/sites?api-version=2016-08-01