sub call_ses {
    my $params = shift;
    my $opts = shift;

    %opts = %$opts;
    %params = %$params;

    my $endpoint_name = $endpoint;
}

##</code><code>##

sub call_ses {

    my $self = shift;

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

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

   my $endpoint_name = $self->AWS_endpoint;

}

##</code><code>##

Can't use an undefined value as a HASH reference at
        /usr/share/perl5/vendor_perl/SES.pm line 559 (#1)
    (F) A value used as either a hard reference or a symbolic reference must
    be a defined value.  This helps to delurk some insidious errors.

Uncaught exception from user code:
        Can't use an undefined value as a HASH reference at /usr/share/perl5/vendor_perl/SES.pm line 559.
        SES::call_ses('HASH(0x243cc00)', 'HASH(0x26a2138)') called at /opt/aws/apitools/ses/bin/ses-get-stats.pl line 168