From 66cea3b9b11f47e8ddad959ccabbf0b1018b5dde Mon Sep 17 00:00:00 2001 From: corvettes13 <86648326+corvettes13@users.noreply.github.com> Date: Fri, 2 Jul 2021 10:11:19 -0500 Subject: Update ch-2.pl --- challenge-119/paul-fajman/perl/ch-2.pl | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/challenge-119/paul-fajman/perl/ch-2.pl b/challenge-119/paul-fajman/perl/ch-2.pl index 06299baa92..f764ea153a 100644 --- a/challenge-119/paul-fajman/perl/ch-2.pl +++ b/challenge-119/paul-fajman/perl/ch-2.pl @@ -1,5 +1,14 @@ #/usr/bin/perl +# Weekly Challenge 119 Task #2 +# Write a script to generate sequence starting at 1. Consider the +# increasing sequence of integers which contain only 1’s, 2’s and +# 3’s, and do not have any doublets of 1’s like below. Please +# accept a positive integer $N and print the $Nth term in the +# generated sequence. + +# 1, 2, 3, 12, 13, 21, 22, 23, 31, 32, 33, 121, 122, 123, 131 + use strict; use warnings; -- cgit