aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorE7-87-83 <fungcheokyin@gmail.com>2021-08-17 13:24:42 +0800
committerE7-87-83 <fungcheokyin@gmail.com>2021-08-17 13:24:42 +0800
commit3be55703b10aa58f12f965455e6609960968f00d (patch)
tree0edc8ce5ee44ea55b6447413f727e2900e5012b5
parent6b52ecb856e9320ffa344b5e8f9df57cc7f7a40b (diff)
downloadperlweeklychallenge-club-3be55703b10aa58f12f965455e6609960968f00d.tar.gz
perlweeklychallenge-club-3be55703b10aa58f12f965455e6609960968f00d.tar.bz2
perlweeklychallenge-club-3be55703b10aa58f12f965455e6609960968f00d.zip
Week 126
-rw-r--r--challenge-126/cheok-yin-fung/perl/ch-2.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-126/cheok-yin-fung/perl/ch-2.pl b/challenge-126/cheok-yin-fung/perl/ch-2.pl
index 2401585f9e..76722e4d6e 100644
--- a/challenge-126/cheok-yin-fung/perl/ch-2.pl
+++ b/challenge-126/cheok-yin-fung/perl/ch-2.pl
@@ -18,7 +18,7 @@ open FILE, $filename or die "Usage: \$ ch-2.pl --file filename_of_the_map\n";
while ($_ = <FILE>) {
chomp($_);
- $map .= ($_."\n");
+ $map .= ($_."\n") if $_;
}
close FILE;