GitHub
/
pbot
mirror of https://github.com/pragma-/pbot.git
3
0
Fork 0
Code Issues Projects Releases Wiki Activity

math.pl: add cbrt and add optional "the" to 42 question

This commit is contained in:
Pragmatic Software 2015-01-23 13:40:33 -08:00
parent 573a18e6ef
commit 938561a2fb
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
modules/math.pl
View File

@ -7,7 +7,7 @@ my ($arguments, $response, $invalid);
my @valid_keywords = (
'sin', 'cos', 'tan', 'atan', 'exp', 'int', 'hex', 'oct', 'log', 'sqrt',
'floor', 'ceil', 'asin', 'acos', 'log10', 'sinh', 'cosh', 'tanh', 'abs',
'pi', 'deg2rad', 'rad2deg', 'atan2'
'pi', 'deg2rad', 'rad2deg', 'atan2', 'cbrt'
);
if ($#ARGV < 0)
@ -19,7 +19,7 @@ if ($#ARGV < 0)
$arguments = join(' ', @ARGV);
my $orig_arguments = $arguments;
$arguments =~ s/answer.*question of life(,? the universe and everything)?\s?/42/gi;
$arguments =~ s/(the )*answer.*question of life(,? the universe and everything)?\s?/42/gi;
$arguments =~ s/meaning of (life|existence|everything)?/42/gi;
if($arguments =~ m/([\$`\|{}"'#@=?\[\]])/ or $arguments =~ m/(~~)/) {