| commit | 824eb0c6ade808c4501e62fbcf0025f4e694cd11 | [log] [tgz] |
|---|---|---|
| author | yuezonghe <zh.yue@mobiletek.cn> | Thu Jun 27 02:32:26 2024 -0700 |
| committer | yuezonghe <zh.yue@mobiletek.cn> | Thu Jun 27 02:44:13 2024 -0700 |
| tree | 13cee949649ece72b1c31aba2eea600eea6614d6 | |
| parent | 703a1d3d22068e43b7bb3d63b3020b975fee9c3f [diff] [blame] |
zte's code,first commit Change-Id: I9a04da59e459a9bc0d67f101f700d9d7dc8d681b
diff --git a/ap/lib/libcurl/curl-7.54.1/tests/server/base64.pl b/ap/lib/libcurl/curl-7.54.1/tests/server/base64.pl new file mode 100644 index 0000000..2eab1fa --- /dev/null +++ b/ap/lib/libcurl/curl-7.54.1/tests/server/base64.pl
@@ -0,0 +1,9 @@ +#!/usr/bin/perl + +use MIME::Base64 qw(encode_base64); + +my $buf; +while(read(STDIN, $buf, 60*57)) { + my $enc = encode_base64($buf); + print "$enc"; +}