wok view ocsinventory-agent/stuff/Tazpkg.pm @ rev 8234

Up: get-LibreOffice (v1.1.9 for stable v3.3.0) - will need fix for next release as this contains fix for incorrect archive packaging.
author Ben Arnold <ben@seawolfsanctuary.com>
date Thu Jan 27 07:36:43 2011 +0000 (2011-01-27)
parents db6394fb176f
children 7e463c50f245
line source
1 package Ocsinventory::Agent::Backend::OS::Generic::Packaging::Tazpkg;
2
3 use strict;
4 use warnings;
5
6 sub check { can_run("tazpkg") }
7
8 sub run {
9 my $params = shift;
10 my $inventory = $params->{inventory};
11
12 # use tazpkg list\n'
13 foreach (`tazpkg list `){
14 next if (/List of/);
15 next if (/packages installed/);
16
17 if (/^(\S+)\[24G\s+(\S+)\[42G\s+(\S+)/) {
18 $inventory->addSoftwares({
19 'NAME' => $1,
20 'VERSION' => $2,
21 'COMMENTS' => $3
22 });
23 }
24 }
25
26 }
27
28 1;