From 349fd9445a0e85f5814bfe6c99de85071de20711 Mon Sep 17 00:00:00 2001
From: Matthew Neleigh <matthew.neleigh@gmail.com>
Date: Thu, 21 Oct 2021 14:45:33 -0400
Subject: 	modified:   challenge-135/mattneleigh/perl/ch-1.pl

---
 challenge-135/mattneleigh/perl/ch-1.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/challenge-135/mattneleigh/perl/ch-1.pl b/challenge-135/mattneleigh/perl/ch-1.pl
index e2f1ed4c09..644a1543da 100755
--- a/challenge-135/mattneleigh/perl/ch-1.pl
+++ b/challenge-135/mattneleigh/perl/ch-1.pl
@@ -49,7 +49,7 @@ sub middle_three_digits{
     my $length;
 
     # Get rid of any leading negative sign
-    # or dicemal point, and find the length
+    # or decimal point, and find the length
     # of the number
     $number =~ s/^-//;
     $number =~ s/\.//;
-- 
cgit