
Your skill will accomplish what the force of many cannot
	PerlMonks

Re^3: modern ways of doing web services - avoid REST too

by Rhandom (Curate)

on Sep 27, 2013 at 15:32 UTC ( [id://1056003]=note: print w/replies, xml )

Need Help??

Help for this page

Select Code to Download

Select or download this

   my $client = API::Client->new({service => "dist"});
   my $data = $client->server_info({hostname => "foo.bar.com"});
   # this maps out to https://someserver.com/dist/server_info POSTing 
+{"hostname":"foo.bar.com"}

Select or download this

package DistService;
use API::Base;
...
    ...
    return \%data;
}

Select or download this

[rhandom@somehost ~/%] ds server_info hostname foo.bar.com
Arguments:
...
| ip            | 0.0.6.11            |
| server_id     | 26208               |
+---------------+---------------------+

Select or download this

0.0.20.86 - - [27/Sep/2013:08:12:50 -0600] "POST /dist/server_info HTT
+P/1.0" 200 292 "-" "-"
0.0.66.29 - - [27/Sep/2013:08:12:50 -0600] "POST /dist/unmanaged_add H
+TTP/1.0" 200 21 "-" "-"
...
0.0.44.15 - - [27/Sep/2013:08:12:52 -0600] "POST /dist/server_info HTT
+P/1.0" 200 294 "-" "-"
0.0.33.11 - - [27/Sep/2013:08:12:52 -0600] "POST /dist/server_info HTT
+P/1.0" 200 293 "-" "-"
0.0.15.80 - - [27/Sep/2013:08:12:52 -0600] "POST /dist/server_info HTT
+P/1.0" 200 290 "-" "-"

Select or download this

0.0.20.86 - - [27/Sep/2013:08:12:50 -0600] "GET /dist/server/32 HTTP/1
+.0" 200 292 "-" "-"
0.0.66.29 - - [27/Sep/2013:08:12:50 -0600] "POST /dist/unmanaged/33 HT
+TP/1.0" 200 21 "-" "-"
...
0.0.44.15 - - [27/Sep/2013:08:12:52 -0600] "GET /dist/server/34 HTTP/1
+.0" 200 294 "-" "-"
0.0.33.11 - - [27/Sep/2013:08:12:52 -0600] "GET /dist/server/38 HTTP/1
+.0" 200 293 "-" "-"
0.0.15.80 - - [27/Sep/2013:08:12:52 -0600] "GET /dist/server/33 HTTP/1
+.0" 200 290 "-" "-"

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1056003]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others cooling their heels in the Monastery: (5)

As of 2024-04-24 11:20 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found