aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <Mohammad.Anwar@yahoo.com>2021-06-06 23:39:30 +0100
committerGitHub <noreply@github.com>2021-06-06 23:39:30 +0100
commit978ab5bf927780e2a73a2b94fa98eeb24064c84e (patch)
treee3fb07e57ab9dc6231a74810de72e3a66ba7f190
parenta032c59352842390cc6626a6274cce4a0f0a6d61 (diff)
parent8cfe7e6efe23f72b3ada58ccf9cd013a54e6cb79 (diff)
downloadperlweeklychallenge-club-978ab5bf927780e2a73a2b94fa98eeb24064c84e.tar.gz
perlweeklychallenge-club-978ab5bf927780e2a73a2b94fa98eeb24064c84e.tar.bz2
perlweeklychallenge-club-978ab5bf927780e2a73a2b94fa98eeb24064c84e.zip
Merge pull request #4210 from Abigail/abigail/week-115
Abigail/week 115
-rw-r--r--challenge-115/abigail/README.md2
-rw-r--r--challenge-115/abigail/bash/ch-1.sh1
-rw-r--r--challenge-115/abigail/bash/ch-2.sh1
-rw-r--r--challenge-115/abigail/blog.txt1
-rw-r--r--challenge-115/abigail/blog1.txt1
-rw-r--r--challenge-115/abigail/perl/ch-1.pl3
6 files changed, 8 insertions, 1 deletions
diff --git a/challenge-115/abigail/README.md b/challenge-115/abigail/README.md
index 725668ba25..96adeb6d8f 100644
--- a/challenge-115/abigail/README.md
+++ b/challenge-115/abigail/README.md
@@ -61,4 +61,4 @@ Output: 7614
* [Ruby](ruby/ch-2.rb)
### Blog
-[String Chain](https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-115-2.html)
+[Largest Multiple](https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-115-2.html)
diff --git a/challenge-115/abigail/bash/ch-1.sh b/challenge-115/abigail/bash/ch-1.sh
index 989e4d1cce..06cab4514f 100644
--- a/challenge-115/abigail/bash/ch-1.sh
+++ b/challenge-115/abigail/bash/ch-1.sh
@@ -8,6 +8,7 @@
# Run as: bash ch-1.sh < input-file
#
+set -f
declare -A nodes
declare -A graph
diff --git a/challenge-115/abigail/bash/ch-2.sh b/challenge-115/abigail/bash/ch-2.sh
index 3da1e61c2b..b708d0b53b 100644
--- a/challenge-115/abigail/bash/ch-2.sh
+++ b/challenge-115/abigail/bash/ch-2.sh
@@ -8,6 +8,7 @@
# Run as: bash ch-2.sh < input-file
#
+set -f
declare -a digits
while read -a input
diff --git a/challenge-115/abigail/blog.txt b/challenge-115/abigail/blog.txt
new file mode 100644
index 0000000000..861aa7f1f2
--- /dev/null
+++ b/challenge-115/abigail/blog.txt
@@ -0,0 +1 @@
+https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-115-1.html
diff --git a/challenge-115/abigail/blog1.txt b/challenge-115/abigail/blog1.txt
new file mode 100644
index 0000000000..fe3bebed56
--- /dev/null
+++ b/challenge-115/abigail/blog1.txt
@@ -0,0 +1 @@
+https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-115-2.html
diff --git a/challenge-115/abigail/perl/ch-1.pl b/challenge-115/abigail/perl/ch-1.pl
index 2b26121b56..220ff32597 100644
--- a/challenge-115/abigail/perl/ch-1.pl
+++ b/challenge-115/abigail/perl/ch-1.pl
@@ -33,6 +33,9 @@ use Algorithm::Graphs::TransitiveClosure qw [floyd_warshall];
# We will output 1 if there is *any* cycle. Including looping back to
# itself. So, if the input contains the word "eye", we will return 1.
#
+# See https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-115-1.html
+# for details on how the algorithm in the module works.
+#
while (<>) {
#