expr ALWAYS with double?

[arcane]

hi
ive got this simple script

Code: Select all

bind pub - "=" calc_calc

proc calc_calc {nick userhost hand chan arg} {
	puthelp "PRIVMSG $chan :[expr $arg]"
}

but if a user types "= 3/2", the result is "1" because expr calculates integers. how can i tell expr to ALWAYS use doubles? result should be "1.5". ill have to change $arg, havent i?

[Papillon]

yes you do

[caesar]

It should type:"3 / 2"

[stdragon]

Just put "1.0 *' at the beginning of the expr and it'll always be double.

% expr "1.0 * 3/2"
1.5

[arcane]

Code: Select all

puthelp "PRIVMSG $chan :[expr (1.0 * ($arg))]"

"= 3/2":
it just puts "1.0"...

but doesnt really matter. was just a test.

[stdragon]

You must have put parenthesis around the integer part. Expr follows order of operations. All you have to do is:

puthelp "PRIVMSG $chan :[expr 1.0 * $arg]"

You could also do a regsub which adds a .0 to all integers in the expression.

But if you are using $arg as input from a user, be careful, because expr will evaluate commands in brackets.

e.g.
% set arg {3 + [hello]}
3 + [hello]
% expr $arg
invalid command name "hello"