存档

2020年2月 的存档

Perl Jifty研究01

2020年2月15日 评论已被关闭

准备写一个基于文本的报价系统,计划用Jifty开发框架。今天晚上完成了开发环境的搭建,在之前装httpd+CGI的CentOS中,做了一些调整。记录如下:
1. CentOS7.2的网络配置在/etc/sysconfig/network-scripts/下的”ifcfg-“开头的系列文件中。只要是以”ifcfg-“开头的,配置都会被系统读出。这个和之前的版本是不一样(即便加上后缀.bak之类也会配置IP)。使用”ip addr list”查看新的IP是否设置成功。
2. CentOS7.2停止开机自动启动服务,使用”systemctl disable httpd-service”取消httpd开机自动重启。“systemctl –type=service”查看所有开机自动运行的服务列表。“systemctl list-units”显示所有当前服务,”systemctl list-unit-files”显示系统所有服务(包括未启动的)。这个和之前的chkconfig配置也不一样。

考RHCE都是十五年前的事情了,这些年对Linux系统的深入研究少了,还得认真补充学习。

使用CPAN安装Jifty, 总是遇到CPAN的网络速度慢或网络无法访问问题。于是想办法把CPAN设置为国内镜像站点后解决。修改CPAN的配置文件MyConfig.pm中urllist对应的链接信息,按照http://www.cpan.org/SITES.html所列出的站点改为国内镜像。 具体步骤如下。

# vim ./cpan/CPAN/MyConfig.pm
'urllist' => [q[http://mirrors.163.com/cpan/], 
              q[ftp://mirrors.ustc.edu.cn/CPAN/], 
              q[http://mirror.lzu.edu.cn/CPAN/]],

然后就可以通过CPAN顺利安装Jifty了。

查看安装的Perl模块有两个方法:

#perldoc -t perllocal | grep Jifty
Fri Feb 14 23:17:01 2020: "Module" Jifty::DBI

第二种方式是使用以下脚本

#!/usr/bin/perl
use strict;
use ExtUtils::Installed;
my $inst = ExtUtils::Installed->new();
my @modules = $inst->modules();
foreach  (@modules) {
        my  $ver = $inst->version($_) || "???";
        printf("%-22s -Version- %-22s\n", $_, $ver);
}
exit;
分类: Perl 标签: