Just an example in Perl from https://github.com/DecentralizedAmateurPagingNetwork/DxClusterInterface/blob/master/dxclusterspider_db0sda

$c = REST::Client->new();								$c->setHost("$dapnethost:$dapnetport");
$c->addHeader('Authorization'=>'Basic ' . encode_base64($dapnetuser . ':' . $dapnetpw));

$c->POST('/news', '{"rubricName": "dx-kwcw", "text": "'.$nachricht.'", "number": '.$pos.'}', {"Content-type"=>'application/json'});