From 58577fb09ce5fe38b32b8acbc92feb40f2fdd4e7 Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Tue, 6 May 2025 13:20:58 -0600 Subject: [PATCH] -- --- perl/Triple.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl/Triple.pm b/perl/Triple.pm index 38cd553..1a74250 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -76,8 +76,8 @@ sub init { banana => 'sand', }; foreach my $key (keys %page) { - my \$set = $page{$key}; - print Dumper $set; + my @set = $page{$key}; + print Dumper @set; # last if $set->[0] == DYNAMIC_PAGE; # syslog("info", "Marking Static '$key'"); # $template->process($datum[1], $vars, \$_) or syslog("info", $template->error()); -- 2.47.3