From 23e8f5eab3ad4ef62889c0078284e0980230213e Mon Sep 17 00:00:00 2001
From: Matthew Neleigh <matthew.neleigh@gmail.com>
Date: Thu, 7 Mar 2024 06:22:47 -0500
Subject: 	modified:   challenge-259/mattneleigh/perl/ch-1.pl

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

diff --git a/challenge-259/mattneleigh/perl/ch-1.pl b/challenge-259/mattneleigh/perl/ch-1.pl
index 60b1fabc14..5e3231ad14 100755
--- a/challenge-259/mattneleigh/perl/ch-1.pl
+++ b/challenge-259/mattneleigh/perl/ch-1.pl
@@ -115,7 +115,6 @@ sub calculate_offset_business_day{
         # Advance the base date by one day and see
         # what day of the week this is
         $base += secs_per_day;
-        @date = gmtime($base);
 
         # See if this date is a bank holiday...
         if(@holidays && ($base == $holidays[0])){
@@ -128,6 +127,7 @@ sub calculate_offset_business_day{
 
         # Skip ahead without decrementing the offset
         # if this is a weekend date
+        @date = gmtime($base);
         next
             if(($date[6] == 0) || ($date[6] == 6));
 
-- 
cgit