Backslash found where operator expected at ./ses-get-stats.pl line 171, near "SES::call_ses \"
	(Do you need to predeclare SES::call_ses?)
syntax error at ./ses-get-stats.pl line 171, near "SES::call_ses \"
Global symbol "$response_code" requires explicit package name at ./ses-get-stats.pl line 172.
Global symbol "$response_content" requires explicit package name at ./ses-get-stats.pl line 174.
Execution of ./ses-get-stats.pl aborted due to compilation errors.</p>

##</code><code>##

parse_args;
validate_opts;
prepare_params;
my ($response_code, $response_content) = SES::call_ses \%params, \%opts;
switch ($response_code) {
    case '200' {              # OK
        print_response $response_content;
        exit  0;
    }
    case '400' { exit  1; }   # BAD_INPUT
    case '403' { exit 31; }   # SERVICE_ACCESS_ERROR
    case '500' { exit 32; }   # SERVICE_EXECUTION_ERROR
    case '503' { exit 30; }   # SERVICE_ERROR
    else       { exit -1; }
}