diff options
| -rw-r--r-- | challenge-140/james-smith/README.md | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-140/james-smith/README.md b/challenge-140/james-smith/README.md index ef0bbca2d0..8689d712fd 100644 --- a/challenge-140/james-smith/README.md +++ b/challenge-140/james-smith/README.md @@ -108,8 +108,8 @@ This is written as a 1-liner as so: ```perl sub get_num { - my($i,$j,$k,$t) = @_; - (sort{$a<=>$b}map{++$t;map{$t*$_}1..$i}1..$j)[$k-1]; + my$t; + (sort{$a<=>$b}map{++$t;map{$t*$_}1..$_[0]}1..$_[1])[$_[2]-1]; } ``` |