From: Emil Williams Date: Tue, 6 May 2025 17:50:59 +0000 (-0600) Subject: -- X-Git-Url: https://git.xolatile.top/?a=commitdiff_plain;h=fb6a843317cf9113c2ac9f241deeac9b8bbb847d;p=emil-3chen.org.git -- --- diff --git a/perl/Triple.pm b/perl/Triple.pm index 1cde45c..b51bb0c 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -14,10 +14,8 @@ use Template; # Internal use Secrets; -our $debug = 0; - sub Triple::main() { - $sitename = (getcwd() =~ s/.*\///); - $debug = 1 if $sitename =~ /^test\./; + my $sitename = (getcwd() =~ s/.*\///); + my $debug = 1 if $sitename =~ /^test\./; openlog($sitename, "ndelay,pid", Sys::Syslog::LOG_DAEMON); }