From 9a4873e00ede4ee1129cdb0a4abdc28c30a7628d Mon Sep 17 00:00:00 2001 From: Thomas Hochstein Date: Sat, 17 Jan 2026 02:47:53 +0100 Subject: [PATCH] FormatOutput(): Add missing variable init. Signed-off-by: Thomas Hochstein --- lib/NewsStats.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lib/NewsStats.pm b/lib/NewsStats.pm index bce70c5..a68e36d 100644 --- a/lib/NewsStats.pm +++ b/lib/NewsStats.pm @@ -501,6 +501,9 @@ sub FormatOutput { my ($Format, $Comments, $LeadIn, $Caption, $Key, $Value, $Precision, $PadField, $PadValue, $LastIteration) = @_; my ($Output); + # initialise $PadValue; $PadField needs not to be initialised, + # as access to both is gated by valid $PadField + $PadValue = 0 if !$PadValue; # create one line of output if ($Format eq 'dump') { # output as dump (key value)