From 388dcf0fef139eea4d574dca779d6a9cb6c7ac86 Mon Sep 17 00:00:00 2001 From: dataking Date: Fri, 24 Mar 2017 13:02:13 -0700 Subject: [PATCH] check for 'tests_skipped' and 'tests_executed' keys before extracting and deleting. --- lynis-report-converter.pl | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/lynis-report-converter.pl b/lynis-report-converter.pl index cdd84f5..962caf8 100755 --- a/lynis-report-converter.pl +++ b/lynis-report-converter.pl @@ -177,10 +177,14 @@ foreach my $key ( sort keys %lynis_report_data ) { my (@tests_skipped, @tests_executed); my ($lynis_version); -@tests_skipped = @{$lynis_report_data{'tests_skipped'}}; -delete($lynis_report_data{'tests_skipped'}); -@tests_executed = @{$lynis_report_data{'tests_executed'}}; -delete($lynis_report_data{'tests_executed'}); +if (exists($lynis_report_data{'tests_skipped'})) { + @tests_skipped = @{$lynis_report_data{'tests_skipped'}}; + delete($lynis_report_data{'tests_skipped'}); +} +if (exists($lynis_report_data{'tests_executed'})) { + @tests_executed = @{$lynis_report_data{'tests_executed'}}; + delete($lynis_report_data{'tests_executed'}); +} if ($debug) { print Dumper(\%lynis_report_data);