e warnings;
use Mojo::UserAgent;
use Aliyun::AuthV2;
use Data::Dumper qw/Dumper/;
use Cpanel::JSON::XS;
use version;
our $VERSION = 0.2;
sub new {
my $class = shift;
$class = (ref $
ss {}, $class;
$self->{'http_head'} = {
'Accept' => 'application/json,*/*;q=0.8,',
'Accept-Encoding' => 'deflate',
'Accept-Language'
my $result = {};
if (my $res = $tx->success) {
$result = decode_json($res->body) || {};
}
else {
my $err = $tx->error;
package Aliyun::Method::FcSmsNumSend;
use 5.010;
use Data::Dumper qw/Dumper/;
use Cpanel::JSON::XS;
use version;
our $VERSION = 0.1;
#阿里大于短信发送
sub new {
my $class = shift;
1];
}
#设置内容替换
sub set_sms_param {
$_[0]->{'params'}->{'sms_param'} = encode_json($_[1]);
}
sub get_params {
return $_[0]->{'params'};
}
1;
__DATA__
=encoding u
')->format_datetime(DateTime->now(time_zone =>
'local')),
'format' => 'json',
'v' => '2.0',
};
foreach ('set_target_app_key', 'set_session', 'se