Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- my $host = 'SERVER:80'; # url used to access the Simpana REST service
- my $header = {
- 'host' => $host,
- };
- my $body = 'username=SomeUser&password=mysecret';
- my $RESTClient = REST::Client->new(host => 'http://' . $host, follow => 0);
- $RESTClient->POST('bppmws/api/authenticate/login', $body, $header); # Send POST method Authentification
- say $RESTClient->responseContent();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement