08.Perl -- 常用函数

Perl中的 rand() 函数返回一个介于0和传递给它的正数(range_value)之间的随机小数，

如果未指定任何值，则返回1。

Perl中的 int() 函数返回给定值的 整数部分 , 不进行四舍五入。

如果未提供值，则返回 $_ 。注意 $_ 是默认输入，在这种情况下为0。

如果提供的变量 VAR 的值不是 undef 值，则Perl中的 defined() 返回 true ；

如果未指定 VAR ，则它检查 $_ 的值。

它可以与许多函数一起使用来检测 *** 作失败，因为如果出现问题，它们将返回 undef 。

例子-- 逐行读取fastq文件

Perl 中的 chomp() 函数从输入字符串中删除最后一个尾随的换行符。

# main.pl

sub print_error { .... }

# MyModule.pm

.....

&main::print_error ( $argv )

可以使用两种方法：

1．require "xxx.pl"

2．use xxx.pm

加入require或者use在perl中相当于将文件xxx.pl/pm整个文件都添加到调用它的文件中；

例如：

gettime.pl

#!/usr/bin/perl

print "gettime is 2011-07-25 14:40:10\n"

showtime.pl

#!/usr/bin/perl

require "gettime.pl"

print "get time ok\n"

则执行showtime.pl会显示：

gettime is 2011-07-25 14:40:10

get time ok

---