摘要:        
[root@wx03 ~]# cat a17.pl use JSON qw/encode_json decode_json/ ;use Encode;my $data = [ { 'name' => 'Ken' , 'age' => 19 }, ...    阅读全文
        
            posted @ 2016-07-11 07:51
czcb
阅读(443)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
use JSON qw/encode_json decode_json/ ;use Encode;my $data = [ { 'name' => 'Ken' , 'age' => 19 }, { 'name' => '测试...    阅读全文
        
            posted @ 2016-07-11 07:49
czcb
阅读(152)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
use JSON qw/encode_json decode_json/ ;use Encode;my $data = [ { 'name' => 'Ken' , 'age' => 19 }, { 'name' => '测试...    阅读全文
        
            posted @ 2016-07-11 07:49
czcb
阅读(150)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
[root@wx03 ~]# cat a14.pl use Net::SMTP;use LWP::UserAgent;use HTTP::Cookies;use HTTP::Headers;use HTTP::Response;use Encode;use JSON;use File::Temp...    阅读全文
        
            posted @ 2016-07-10 22:26
czcb
阅读(168)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
[root@wx03 ~]# cat a14.pl use Net::SMTP;use LWP::UserAgent;use HTTP::Cookies;use HTTP::Headers;use HTTP::Response;use Encode;use JSON;use File::Temp...    阅读全文
        
            posted @ 2016-07-10 22:26
czcb
阅读(226)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
encode_json $json_text = encode_json $perl_scalarConverts the given Perl data structure to a UTF-8 encoded, binary string.This function call is f...    阅读全文
        
            posted @ 2016-07-10 21:50
czcb
阅读(182)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
encode_json $json_text = encode_json $perl_scalarConverts the given Perl data structure to a UTF-8 encoded, binary string.This function call is f...    阅读全文
        
            posted @ 2016-07-10 21:50
czcb
阅读(137)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
##µ¼Èë encode_json decode_json use JSON qw/encode_json decode_json/; print "1111111111111111-\$d is $d\n"; sleep(30); $d = encode_utf8($...    阅读全文
        
            posted @ 2016-07-10 21:43
czcb
阅读(434)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
##µ¼Èë encode_json decode_json use JSON qw/encode_json decode_json/; print "1111111111111111-\$d is $d\n"; sleep(30); $d = encode_utf8($...    阅读全文
        
            posted @ 2016-07-10 21:43
czcb
阅读(289)
评论(0)
推荐(0)
        
        
            
        
        
摘要:        
utf8 Perl编译 来启用/禁用 UTF-8(or UTF-EBCDIC) 在源代码里简洁:use utf8; no utf8; # Convert the internal representation of a Perl scalar to/from UTF-8. $num_octets...    阅读全文
        
            posted @ 2016-07-10 15:37
czcb
阅读(214)
评论(0)
推荐(0)
        
        
 
                     
                    
                 
                    
                 
         浙公网安备 33010602011771号
浙公网安备 33010602011771号