SendingProcess.pm

	my $current_quota_allotment = 0;
	my $current_quota_messages_key = undef;
	my $current_quota_hourly_messages_key = undef;
	my $current_quota_hour = undef;

	my $return_organization_message_allotment = sub {
		return if ( $current_quota_allotment <= 0 );

		# Load the script if it's not already been read.

		if ( ! defined $request_organization_message_allotment_sha ) {
			$request_organization_message_allotment_sha = load_lua_script("return_organization_message_allotment");
		}

		# Call the allocator request script.

		my $result = $redis->evalsha($request_organization_message_allotment_sha, 0, $organization_id, ...);

		# Return the result.

		return $result;
	};