From 90be68f77f5776797a6bdcad053a549437577419 Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Tue, 6 May 2025 13:08:43 -0600 Subject: [PATCH] -- --- perl/Triple.pm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/perl/Triple.pm b/perl/Triple.pm index fcca4fe..61532fb 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -76,13 +76,12 @@ sub init { banana => 'sand', }; foreach (my ($path, @datum) = each %page) { + print Dumper @datum; if ($datum[0] == DYNAMIC_PAGE) { - syslog("info", "Marking Dynamic '$path'"); - print "I'm having a stroke"; + # syslog("info", "Marking Dynamic '$path'"); next; } - syslog("info", "Marking Static '$path'"); - print "You are."; + # syslog("info", "Marking Static '$path'"); # $template->process($datum[1], $vars, \$_) or syslog("info", $template->error()); # $static{$path} = $_; } -- 2.47.3