Perl abs函数


PHP已经学习得七七八八了。接下来要有大的进展,就是要从实践中学习了。那现在要转战Perl咯,开始学习Perl的函数。

每日一函数:Perl abs函数

介绍

abs函数返回它的参数(VALUE)的绝对值。当没有指定参数时,返回$_的绝对值。

用法

abs VALUE
abs (使用$_作为缺省的参数)

例子:

my $diff = abs($first - $second);

再看下面的例子:

#!/usr/bin/perl
$par1 = 10.25;
$par2 = 20;
$par3 = "ABC";
$abs1 = abs($par1);
$abs2 = abs($par2);
$abs3 = abs($par3);
print "Abs value of par1 is $abs1\n" ;
print "Abs value of par2 is $abs2\n" ;
print "Abs value of par3 is $abs3\n" ;

 

返回的结果为:

Abs value of par1 is 10.25
Abs value of par2 is 20
Abs value of par3 is 0

7条回应:“Perl abs函数”

  1. 我觉得perl里的库函数,很有用;当初我学习c语言时候,用到那些字符串的库函数,就觉得的很神奇。呵呵,我也是学生物的,不过最近也是需要用下perl,perl处理生物序列还是很强大的。c的话有些麻烦不擅长这个,估计。感觉编程水好深,有时候觉得望不到底,不管你学多少……