免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 3288 | 回复: 3
打印 上一主题 下一主题

Perl使用技巧3:常用cpan模块 [复制链接]

论坛徽章:
2
程序设计版块每日发帖之星
日期:2015-12-18 06:20:00每日论坛发贴之星
日期:2015-12-18 06:20:00
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2015-12-11 16:25 |只看该作者 |倒序浏览
本帖最后由 arche77 于 2015-12-15 11:51 编辑

最常用的CPAN命令是:

cpan install Data:umper;

会用cpan了,你就无敌了。抛开深入研究内部原理不说,使用别人的模块,绝对是快速组装自己业务逻辑的方法。

----------------------

如何更换cpan源为国内源?

找到/var/root/.cpan/CPAN/MyConfig.pm

  'urllist' => [q[***http***://mirrors.163.com/cpan/]],

找到这个字段,替换为网易的cpan源,速度哗哗哗的。注意把上面6个*号去掉。

----------------------
以下是我最常用的模块:

# core
use Carp;                                                                #croak=die crap=warn
use Data:umper;                                                #Dumper
use DirHandle;                                                        #read
use FileHandle;                                                        #getlines
use File::Basename;
use Encode;                                                                #encode decode decode_utf8
use experimental qw(smartmatch);                #smartmatch
use HTTP::Request::Common;                                #GET POST
use HTTP::Cookies;
use List::Util qw(shuffle);                                #min max sum shuffle any all
use LWP::Simple;                                                #get getstore mirror
use Net:ing;
use POSIX;                                                                #ceil strftime
use URI::Escape;                                                #uri_escape uri_unescape
# new
use Data:rinter;                                                #p
use File::Copy;                                                        #copy move core:rename unlink mkdir rmdir
use File:ath;                                                        #mkpath rmtree
use File::Basename;                                                #fileparse
use Parallel::ForkManager;                                #并发
use File::Temp qw(tempfile);                        #($fh,$name)=tempfile()
use File:ath qw(make_path remove_tree);        #make_path('/tmp/a/b/c')

use File::Slurper qw(read_text read_lines read_dir);
# use Params::Check;
# use Hash::Ordered;

=pod
Set::Scalar
Unicode::CheckUTF8
=cut

# cpan
use App::ColorNamer;
use CGI::Simple qw(-debug1);                                #可以命令行输入参数
use Convert::Base64;
use DBD::mysql;
use DBI;
use Deep::Encode;                                                        #deep_utf8_decode
use Digest::MD5 qq(md5_hex);                                #必须手工引入
use Digest::HMAC_SHA1;
use Digest::MD5::File qw(file_md5_hex);                #必须手工引入
use File::Slurp;                                                        #read_file write_file
use Image::Magick;
use JSON;                                                                        #from_json to_json
use JSON:arse qw(valid_json);                                #valid_json
use LWP:rotocol::https;        #https
use List::MoreUtils;                #uniq
use Math::Round;                        #round
use Perl6::Say;                                #say
use Sort::Hash;
use Switch;
use Text::Trim;                                #trim
use Try::Tiny;

论坛徽章:
3
2015亚冠之阿尔希拉尔
日期:2015-08-15 16:33:2215-16赛季CBA联赛之四川
日期:2016-01-03 13:37:0515-16赛季CBA联赛之四川
日期:2016-06-13 15:53:36
2 [报告]
发表于 2015-12-15 10:18 |只看该作者
Windows系统的ActivePerl是在C:\Perl\lib\CPAN\Config.pm里修改“'urllist' => ['\h\t\t\p\://mirrors.163.com/cpan','\h\t\t\p\:\/\/ppm.activestate.com/CPAN', '\h\t\t\p\:\/\/cpan.perl.org']”

minirain
20151215

arche77 发表于 2015-12-11 16:25
最常用的CPAN命令是:

cpan install Data:umper;

论坛徽章:
0
3 [报告]
发表于 2015-12-15 10:24 |只看该作者
现在都用cpanm了啊。。

论坛徽章:
0
4 [报告]
发表于 2015-12-16 11:01 |只看该作者
还有cpm


回复 3# wexinperl


   
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP