installed packages array

This commit is contained in:
dataking 2016-11-21 00:29:21 -08:00
parent 5e60ce669a
commit 37b9f8ed58

View File

@ -160,6 +160,13 @@ if ($debug) {
if ($json) {
require JSON;
# tidy up some of the "object" variables
my @ipa = @{$lynis_report_data{'installed_packages_array'}};
my @ipa_new;
foreach my $pkg ( @ipa ) {
my ($name,$vers) = split(/\,/, $pkg);
push @ipa_new, { 'name' => $name, 'version' => $vers };
}
$lynis_report_data{'installed_packages_array'} = \@ipa_new;
my @nlp = @{$lynis_report_data{'network_listen_port[]'}};
my @nlp_new;
foreach my $pt (@nlp) {