aboutsummaryrefslogtreecommitdiff
path: root/challenge-246/bob-lied/perl
diff options
context:
space:
mode:
authorBob Lied <boblied+github@gmail.com>2023-12-04 18:17:53 -0600
committerBob Lied <boblied+github@gmail.com>2023-12-04 18:17:53 -0600
commit948bc468fd091b727dc5046eb86a2eb0a014a089 (patch)
treece7603cc681e182d320a5e6c3da2ff5b58068e40 /challenge-246/bob-lied/perl
parent9f285565eec936c173da291c656ab276546bfec6 (diff)
downloadperlweeklychallenge-club-948bc468fd091b727dc5046eb86a2eb0a014a089.tar.gz
perlweeklychallenge-club-948bc468fd091b727dc5046eb86a2eb0a014a089.tar.bz2
perlweeklychallenge-club-948bc468fd091b727dc5046eb86a2eb0a014a089.zip
Week 246 complete with blog
Diffstat (limited to 'challenge-246/bob-lied/perl')
-rw-r--r--challenge-246/bob-lied/perl/ch-1.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-246/bob-lied/perl/ch-1.pl b/challenge-246/bob-lied/perl/ch-1.pl
index 791f7f0a84..394f4db426 100644
--- a/challenge-246/bob-lied/perl/ch-1.pl
+++ b/challenge-246/bob-lied/perl/ch-1.pl
@@ -10,4 +10,4 @@
#=============================================================================
use feature qw/say/;
-say for sort { $a <=> $b} map { int(rand(48)) + 1 } 1..6;
+say for sort { $a <=> $b} map { int(rand(49)) + 1 } 1..6;