From fe88b7af2a2b39efea92448c2eea8e97dd3ed92d Mon Sep 17 00:00:00 2001 From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5> Date: Wed, 20 Aug 2003 17:52:37 +0000 Subject: [PATCH] have some more pi, treat ^ as ** git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@800 c11ca15a-4712-0410-83d8-924469b57eb5 --- blootbot/src/Modules/Math.pl | 3 ++- blootbot/src/Modules/nickometer.pl | 2 +- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/blootbot/src/Modules/Math.pl b/blootbot/src/Modules/Math.pl index 1e23177..f84fc3d 100644 --- a/blootbot/src/Modules/Math.pl +++ b/blootbot/src/Modules/Math.pl @@ -78,8 +78,9 @@ sub perlMath { } for ($locMsg) { - s/\bpi\b/3.1415/g; + s/\bpi\b/3.14159265/g; s/ to the / ** /g; + s/\^/ ** /g; s/\btimes\b/\*/g; s/\bdiv(ided by)? /\/ /g; s/\bover /\/ /g; diff --git a/blootbot/src/Modules/nickometer.pl b/blootbot/src/Modules/nickometer.pl index 567c870..1295ed2 100644 --- a/blootbot/src/Modules/nickometer.pl +++ b/blootbot/src/Modules/nickometer.pl @@ -10,7 +10,7 @@ use strict; -my $pi = 3.1415; +my $pi = 3.14159265; my $score = 0; my $verbose = 0; -- 2.39.5