1 package System::Introspector::Report::Builder::Packages::Apt::API;
9 my ($self, $id, $data) = @_;
10 my $host = $data->{host}{hostname};
11 my $package = $data->{'packages/apt'}{installed}{packages} || {};
12 my $upgrade = $data->{'packages/apt'}{upgradable}{actions}{inst} || {};
13 return $self->_collect_from_data($id, $host, $package, $upgrade, $data);
17 my ($self, $string, $version) = @_;
19 unless defined $string;
20 $string =~ s{^\[\Q$version\E\]\s*\((.+)\)$}{$1};