1 从CPAN安装模块
搜索模块
找到后,安装,例如:
perl -MCPAN -e 'install HTML::WikiConverter'
2 debug
perl -d program_name
perl -d:Ptkdb program_name
需要Kt和Devel::Ptkdb,注意大小写,我安装的时候装了个小写,解决办法使用ln -s创建一个符号链接到小写。
http://perldoc.perl.org/perldebug.html
3 判断文件是否存在
if -e
http://perldoc.perl.org/functions/-X.html
4 1; in perl file
The file must return true as the last statement to indicate successful execution of any initialization code, so it's customary to end such a file with 1; unless you're sure it'll return true otherwise. But it's better just to put the 1; , in case you add more statements.
http://perldoc.perl.org/functions/require.html
1 in the end of module means that module returns true to use/require statements. It can be used to tell if module initialization is successfull. Otherwise use/require will fail.
http://stackoverflow.com/questions/1940182/what-does-1-mean-in-perl
5 shift
shift and unshift do the same thing to the left end of an array thatpop and push do to the right end.
http://perldoc.perl.org/functions/shift.html
6 列出文件entry
$::dir="\.";
opendir( CONF, $::dir ) or die $!;
while( $::config = readdir( CONF ) ) {
print "Traverse : $::config\n";
next if( $::config !~ /([^\/]+)\.conf$/ );
#$::config = readdir ( CONF );
print "Found : $::config\n";
}
http://perldoc.perl.org/functions/readdir.html