sub call_ses {

    my $self = shift;

    my $params = shift;
    my $opts   = shift;

    %opts   = %$opts;  <-- Line 559
    %params = %$params;

   my $endpoint_name = $self->AWS_endpoint;

}