分类目录归档:perl

PHP_SELF变量!

假如命令行的地址是:http://www.baidu.com/index.php
那么:
$_SERVER[‘HTTP_HOST’]==’www.baidu.com’
$_SERVER[‘PHP_SELF’]==’/index.php’
明白了吧,一个是主机地址,一个是脚本文件的绝对路径
什么叫经典

perl学习笔记

2012.01.26
#!/usr/bin/perl -w
use strict;
#语法检查

printf "1234567890" x 7 . "\n";
#重复7次,也就是总共70列,后面的.是字符串连接符
my @lines=;
#从标准输入中读取数组,一般都是键盘,注意和<>的区别

foreach (@lines) {
my $lines=$_;
#定义标量,并把数组中的元素复制给$lines
chomp $lines;
#去掉数组元素的换行符,chomp的返回值是去掉的换行符的数量,一般都是1或者0
printf "%20s\n",$lines;
#打印从键盘输入的内容
}

改进过的:
#!/usr/bin/perl -w
use strict;
print "Please input scale:\n";
chomp(my $scale=);
#chomp,去掉了后面的换行符
printf "1234567890" x ($scale/10) . "\n";
#x后面的重复数字,会自动舍去小数,按整数计算

print "Please type long:\n";
chomp(my $long=);
$long=("%" . $long . "s" . "\n");
#这里的括号不能省略,省略了会产生歧义
my @lines=;
foreach (@lines) {
my $lines=$_;
#这里可以直接使用$_
chomp $lines;
#print $long;
printf $long,$lines;
}

CPAN基本介绍
1.perl模块是perl的库,就好比c/c++写的可执行文件需要用到.a静态库和.so动态库一样。
2.CPAN(http://www.cpan.org/)是perl官方站点(http://www.perl.com/)的一个“军火库”,里面有上百万的perl模块,用来支撑perl强大的功能,从生物工程到天文计算,从宏观世界到原子力学,无所不有。
3.为了很方便的安装perl模块,有人做了一个CPAN模块,用cpan命令来管理和安装CPAN网站上的所有perl模块。
cpan命令
1.cpan命令其实也是一个perl脚本,对于不同版本的perl,可能cpan命令的功能强弱有所不同;
2.执行cpan,我们进入了一个类似bash的界面,暂且叫做cpanshell,cpanshell上可以像bash一样输入命令,这个命令是CPAN所特有的。
3.我们一般常用到的cpan命令主要有:
1.help
•help命令是显示帮助信息,这里面包含了所有的cpan命令,虽然看上去只有一屏,但功能确是非常强大哟!
2.m //
这个是一个模式,用来查找perl模块,有点像perl正则里面的m//,用于匹配(match),但这里m与//之间多了一个空格,且这里的m指
modules,意思是根据模块名称查找,//内可以使用正则; 同理
a(authors)、b(bundles)、d(distributions)和i(in all)都有这种模式。
3.install
•install命令是安装perl模块,一般是接模块名称,而不是压缩包名字。比如DBD::mysql,而不是DBD-mysql,即

   install DBD::mysql
CPAN配置
•CPAN安装是网络安装,如果没有网络,使用cpan命令是无法安装的,所以CPAN安装的速度是与网络有直接关系;•当然,我们可以选择一个快速的镜像站点来安装CPAN模块,那如何配置呢?

1.如果是第一次使用CPAN,那么执行cpan命令的时候,cpan命令会给出配置的友好提示,不过很多人都对这个友好提示的繁冗程度显得很不耐烦,不过新版本的CPAN模块已经改善了这一缺点;

2.如果不是第一次使用CPAN,而以前别人配置的CPAN镜像站点出了问题不能下载,或镜像站点太慢等等修改一下配置信息,可以重新配置CPAN:

 

 

  CPAN>o conf init

•若不是root用户,使用cpan命令或perl -MCPAN -e shell也可以进行配置后安装:

1.首先,配置好CPAN配置,这个配置可以使用非root用户配置好,配置好的内容一般在$HOME/.cpan/CPAN/MyConfig.pm文件内;

2.配置文件MyConfig.pm中配置信息中确定有 ‘makepl_arg’=>q[PREFIX=~/perl] 这一行,~/perl为你当前用户有权限读、写和执行的目录;

3.最后,设置 PERL5LIB 环境变量,把 ~/perl 下的相关目录添加进 PERL5LIB。以 bash shell 为例,在 ~/.bash_profile 里添加如下即可:

 

 

  export PERL5LIB=~/perl/lib:\  ~/perl/lib/perl5/5.8.0/i386-linux-thread-multi:\  ~/perl/lib/perl5/5.8.0:\  ~/perl/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi:\  ~/perl/lib/perl5/site_perl/5.8.0:\  ${PERL5LIB}
模块检测
•运行

 

  $perl -e ‘use Module’

如果没有任何输出,则表示模块 Module 成功安装

 
•打印模块版本

 

  $perl -MModule -e ‘print $Module::VERSION;’
注意事项
1.使用 CPAN 安装模块有时候会 make test 一步失败。可到 $HOME/.cpan/build 的相应目录下直接 make install;

2.第一次安装 CPAN 时,可以先安装:

 

  install Bundle::CPAN

 
  installBundle::CPANxxl?

这样以后的安装包安装就会少需要的依赖,建议安装。