sub Monitoring_Server_POST {
 
    my $LWP = LWP::UserAgent -> new;
    
	my $Monitoring_Cookies = HTTP::Cookies -> new( file           => "C:\Temp" ,
					    			 		  autosave       => 1         ,
							     			  ignore_discard => 1           
                                            );
	
    my $Monitoring_URL_Basis     = "http://eaiservices.telekom.de/Monitoring/timb-dbbrowser/";
	my $Monitoring_URL_Parameter = $_[0];
    
    my $Monitoring_Server_POST = $Monitoring_URL_Basis . $Monitoring_URL_Parameter;
    
    my $Monitoring_Anfrage_POST  = HTTP::Request -> new( POST => $Monitoring_Server_POST );
       $Monitoring_Anfrage_POST -> header( 'content-type' => 'application/json' );
    
	   $Monitoring_Cookies -> add_cookie_header( $Monitoring_Anfrage_POST );
	
    my $Monitoring_Rueckmeldung_POST = $LWP -> request( $Monitoring_Anfrage_POST );
      
    if ( $Monitoring_Rueckmeldung_POST -> is_success ) 
    {  
    	my $Monitoring_Inhalte_POST = $Monitoring_Rueckmeldung_POST -> decoded_content;
    	
    	print "POST Rueckmeldung \t : In Ordnung" , "\n";
    	print "HTTP POST Code    \t : " , $Monitoring_Rueckmeldung_POST -> code    , "\n";
        print "HTTP POST Meldung \t : " , $Monitoring_Rueckmeldung_POST -> message , "\n";  	
    
		return( "$Monitoring_Inhalte_POST" );
    	
    } else {
    
    print "HTTP POST Error Code    : ", $Monitoring_Rueckmeldung_POST -> code    , "\n";
    print "HTTP POST Error Meldung : ", $Monitoring_Rueckmeldung_POST -> message , "\n";
    
    }

}