You can use that solution in your module

sub postSnippetsFile {
    my ( $self, %options ) = @_;
    
    my $request = HTTP::Request::Common::POST( '', 
     'Content_Type' => 'form-data',  
     'Content' => [ file => [ $options{file} ] ],
    );
    $request->authorization_basic($options{username},$options{password
+});
    #print Dumper $request;
    
    my $headers = {
      'Content-Type'  => $request->header('Content-Type'),
      "Authorization" => $request->header('Authorization'),
    };
    
    my $body_content = $request->content;
    #print Dumper $headers,$body_content;
        
    $self->{_client}->POST( $options{url}, $body_content ,$headers );
    #print $self->{_client}->responseCode();
    return $self->{_client}->responseContent();
}
[download]