From a9ea6c43fba6620b202e52edb5616c14337962bf Mon Sep 17 00:00:00 2001 From: James Smith Date: Mon, 5 Dec 2022 08:24:09 +0000 Subject: Update README.md --- challenge-194/james-smith/README.md | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/challenge-194/james-smith/README.md b/challenge-194/james-smith/README.md index 579581f98f..50abcdd7c8 100644 --- a/challenge-194/james-smith/README.md +++ b/challenge-194/james-smith/README.md @@ -44,8 +44,8 @@ My original code allowed `24:00` as a valid value - this gave a slightly more co ```perl sub digit_2400 { sub { - $_[0] eq '?' ? ( $_[1]==4 && $_[3]==0 && $_[4]==0 || $_[1]<4 ? 2 : 1 ) - : $_[1] eq '?' ? ( $_[0]<2 ? 9 : $_[3]==0 && $_[4]==0 ? 4 : 3 ) + $_[0] eq '?' ? ( $_[1]<4 ? 2 : $_[1]==4 && $_[3]==0 && $_[4]==0 ? 2 : 1 ) + : $_[1] eq '?' ? ( $_[0]<2 ? 9 : $_[3]==0 && $_[4]==0 ? 4 : 3 ) : $_[3] eq '?' ? 5 : 9 }->( split //, $_[0] ); -- cgit