Select Code to Download

package ClientRest;

...
# Module further implementation here

1;

#!/usr/bin/perl
use strict;
...
                         }
                       ]
        };

$ curl -i -X POST -H "Content-Type:application/json" -u user:password 
+http://localhost:8000/snippets/ -d '{
>     "title": "Test Title",
...
Allow: GET, POST, HEAD, OPTIONS

{"url":"http://localhost:8000/snippets/2/","id":2,"highlight":"http://
+localhost:8000/snippets/20/highlight/","owner":"user","title":"Test T
+itle","code":"print \"Test POST Request\"","linenos":false,"language"
+:"perl","style":"emacs"}

my $headers = {Accept => 'application/json', Authorization => 'Basic '
+ . encode_base64($username . ':' . $password)};