From 1b300cfd72ea76888a56b1a2bc9e96f8bce748a3 Mon Sep 17 00:00:00 2001
From: Abigail <abigail@abigail.be>
Date: Sun, 18 Apr 2021 19:43:00 +0200
Subject: Small improvements

---
 challenge-108/abigail/perl/ch-2.pl | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/challenge-108/abigail/perl/ch-2.pl b/challenge-108/abigail/perl/ch-2.pl
index d89e32391e..c1f4457967 100644
--- a/challenge-108/abigail/perl/ch-2.pl
+++ b/challenge-108/abigail/perl/ch-2.pl
@@ -40,11 +40,9 @@ if ($type == $TYPE_PLAIN) {
 elsif ($type == $TYPE_FETCH) {
     use OEIS;
     $, = ", ";
-    say oeis (110 => 10)
+    say oeis (110 => $COUNT)
 }
 elsif ($type == $TYPE_COMPUTE) {
-    my $COUNT = 10;
-
     #
     # Create Bell triangle (See https://en.wikipedia.org/wiki/Bell_triangle)
     # The Bell numbers (starting from the second one), are on the
-- 
cgit