diff options
author | ivan <ivan> | 2008-08-28 19:09:19 +0000 |
---|---|---|
committer | ivan <ivan> | 2008-08-28 19:09:19 +0000 |
commit | f0d52fc82b138598228c401d99b56e88366c6945 (patch) | |
tree | 38ea8756389ca2eb9ba323e3a6f984361b631747 /FS/FS/Yori.pm | |
parent | 669bd6b315633c99ac61441198c2c4e45401c36b (diff) |
payment gateway survey
Diffstat (limited to 'FS/FS/Yori.pm')
-rw-r--r-- | FS/FS/Yori.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/FS/FS/Yori.pm b/FS/FS/Yori.pm index 01f36b1c0..8ecb05a0f 100644 --- a/FS/FS/Yori.pm +++ b/FS/FS/Yori.pm @@ -9,6 +9,7 @@ our @EXPORT_OK = qw( reports report ); sub reports { #should be autogenerated i guess qw( freeside_version debian_version pg_version apache_version apache_mpm + payment_gateways ); #ssh_vulnkey } @@ -59,6 +60,13 @@ sub report_apache_mpm { $apache_mpm; } +sub report_payment_gateways { + my @gateways = split(/\n/, + `aptitude -F '%c %p' search 'libbusiness-onlinepayment-.*' | grep '^i ' | grep -v '^i libbusiness-onlinepayment-perl' | cut -c29- | cut -d- -f1` + ); + join(', ', @gateways); +} + #sub report_ssh_vulnkey{ # my $ssh_vulnkey = `ssh-vulnkey -a | grep COMPROMISED`; # $ssh_vulnkey; |