The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Aliyun - 阿里云SDK

SYNOPSIS

#!/usr/bin/perl use 5.010; use Aliyun::AuthV2; use Aliyun::Request; use Aliyun::Method::FcSmsNumSend; use Aliyun::Method::FcIotQrycard; use Data::Dumper qw/Dumper/;

my $auth = Aliyun::AuthV2->new(); $auth->set_appkey('你自己的key'); $auth->set_secretkey('你自己的秘钥');

my $method = Aliyun::Method::FcSmsNumSend->new(); $method->set_rec_num('13800138000'); $method->set_sms_free_sign_name('短信签名'); $method->set_sms_template_code('短信模板id'); $method->set_sms_param('{"rain":"下雨","temper":"18"}');

my $method2 = Aliyun::Method::FcIotQrycard->new(); $method2->set_bill_source('ICCID'); $method2->set_bill_real('123123'); $method2->set_iccid('123123');

my $request = Aliyun::Request->new(); $request->get($auth, $method, sub { say Dumper $_[0]; });

$request->get($auth, $method2, sub { say Dumper $_[0]; });

SEE ALSO

Aliyun::Request,Aliyun::AuthV2

AUTHOR

CGI.NET loveme1314@gmail.com

LINCENSE

MIT