From 6322ffbfd2f6d109dde80d8e7c4847be27a4db43 Mon Sep 17 00:00:00 2001 From: doy Date: Mon, 27 Apr 2009 00:11:38 -0500 Subject: make 24 only generate 2 digit numbers at most --- lib/Bot/Games/Game/24.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/lib/Bot/Games/Game/24.pm b/lib/Bot/Games/Game/24.pm index e8790f4..b5f50ad 100644 --- a/lib/Bot/Games/Game/24.pm +++ b/lib/Bot/Games/Game/24.pm @@ -77,6 +77,7 @@ sub generate_24 { $n1 *= $val; $n2 = $n1 / $val; } + redo if $n1 >= 100 || $n2 >= 100; splice @nums, $index, 1, ('(', $n1, $op, $n2, ')'); } pop @nums; -- cgit v1.2.3-54-g00ecf