From 8d7aa571a4ad953fe67692ed3beec61c406eed21 Mon Sep 17 00:00:00 2001
From: Adam Russell <ac.russell@live.com>
Date: Sun, 23 May 2021 15:37:44 -0400
Subject: Updated Perl solution to Task #1.

---
 challenge-113/adam-russell/perl/ch-1.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/challenge-113/adam-russell/perl/ch-1.pl b/challenge-113/adam-russell/perl/ch-1.pl
index 6f9714010d..ca77eb766d 100644
--- a/challenge-113/adam-russell/perl/ch-1.pl
+++ b/challenge-113/adam-russell/perl/ch-1.pl
@@ -1,7 +1,10 @@
 use strict;
 use warnings;
 ##
-#  
+# You are given a positive integer $N and a digit $D.
+# Write a script to check if $N can be represented as 
+# a sum of positive integers having $D at least once. 
+# If the check passes print 1 otherwise 0.  
 ##
 sub is_represented{
     my($n, $d) = @_;  
-- 
cgit