Removed debug statement

diff --git a/perl/sctweb b/perl/sctweb
index 63b7cbf4a24ec615d76e006129a36a2701bd2ab4..08bdbbc781ce9486b2ade00300f36c8b8e745563 100755 (executable)
--- a/perl/sctweb
+++ b/perl/sctweb
@@ -100,7 +100,6 @@ sub off_for_holidays {
        push @holidays, $_+1
            if (defined($days[5]) && $good==2);
     }
-    print "@holidays\n";
     return wantarray ? @holidays : "@holidays";
 }