From d916ca90c354b29cc1b0953508e9601576a4fd1e Mon Sep 17 00:00:00 2001
From: Guillermo Ramos
Date: Mon, 1 Jul 2019 13:53:37 +0200
Subject: [all] Formatting, missing comments in header, etc

---
 008/ch1.pl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

(limited to '008')

diff --git a/008/ch1.pl b/008/ch1.pl
index 81d590c..bbd1893 100755
--- a/008/ch1.pl
+++ b/008/ch1.pl
@@ -1,10 +1,14 @@
 #!/usr/bin/env perl
+#
+# Write a script that computes the first five perfect numbers. A perfect number
+# is an integer that is the sum of its positive proper divisors (all divisors
+# except itself).
+# (https://en.wikipedia.org/wiki/Perfect_number)
+################################################################################
 
 use strict;
 use warnings;
 
-my @primes;
-
 sub perfect {
     my $sum = 0;
     my $n = shift;
-- 
cgit v1.2.3