Perl有求绝对值的操作或者函数吗？

每日一瓜

UID: 2924
帖子: 130
积分: 299
在线时间: 23 小时

1^# 每日一瓜发表于 2008-12-08 16:47

Perl有求绝对值的操作或者函数吗？

望大侠帮忙,谢谢！

hitsubunnu

UID: 19600
帖子: 1
积分: 2
在线时间: 10 分钟

2^# hitsubunnu 发表于 2008-12-08 16:55

if else

每日一瓜

UID: 2924
帖子: 130
积分: 299
在线时间: 23 小时

3^# 每日一瓜发表于 2008-12-08 16:57

QUOTE:

原帖由 hitsubunnu 于 2008-12-8 16:55 发表
if else

太麻烦

hitsubunnu

UID: 19600
帖子: 1
积分: 2
在线时间: 10 分钟

4^# hitsubunnu 发表于 2008-12-08 17:03

QUOTE:

原帖由每日一瓜于 2008-12-8 16:57 发表

太麻烦

$str = - $str if($str <0);

MMMIX

UID: 31964
帖子: 137
积分: 315
在线时间: 1 天 1 小时

5^# MMMIX 发表于 2008-12-08 17:12

perldoc -f abs

ly5066113

UID: 41125
帖子: 34
积分: 78
在线时间: 1 小时

6^# ly5066113 发表于 2008-12-08 17:14

猜了一下，abs可以用。

perl -e 'print abs(-1);'

xiaoyu9805119

UID: 39268
帖子: 67
积分: 154
在线时间: 6 小时

7^# xiaoyu9805119 发表于 2008-12-08 17:32

不知道abs？？若干语言都有这个函数。。。

每日一瓜

UID: 2924
帖子: 130
积分: 299
在线时间: 23 小时

8^# 每日一瓜发表于 2008-12-09 10:34

哦,abs果然好用，谢谢大家！