duckduckgo
/
zeroclickinfo-goodies
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Modified dice to allow for 4 digit dice count

master
Wayne A. Arthurton 2012-03-14 18:09:43 -04:00
parent f318b774ba
commit aac345ac0a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/DDG/Goodie/Dice.pm
View File

@ -24,7 +24,7 @@ handle remainder => sub {
}
return join(' ', @output) if @output;
}
elsif ($_ =~ /^(\d{0,2})[d|w](\d+)\s?([+-])?\s?(\d+|[lh])?$/) { # 'w' is the German form
elsif ($_ =~ /^(\d{0,4})[d|w](\d+)\s?([+-])?\s?(\d+|[lh])?$/) { # 'w' is the German form
my $output;
my $number_of_dice = $1 || 1;
my $number_of_faces = $2;
@ -42,7 +42,7 @@ handle remainder => sub {
} else {
push(@rolls, -(pop(@rolls)));
}
} elsif ($3 eq '+' && ($4 eq 'l' || $4 eq 'h')) {
} elsif ($3 eq '+' && ($4 eq 'l' || $4 eq 'h')) {
return;
} else {
push(@rolls, int("$3$4"));