--- doc/loncapafiles/rpmcheck.piml	2004/05/24 18:08:26	1.3
+++ doc/loncapafiles/rpmcheck.piml	2004/05/28 12:45:18	1.5
@@ -3,7 +3,7 @@
 <!-- phpcheck.piml -->
 <!-- Matthew Hall -->
 
-<!-- $Id: rpmcheck.piml,v 1.3 2004/05/24 18:08:26 matthew Exp $ -->
+<!-- $Id: rpmcheck.piml,v 1.5 2004/05/28 12:45:18 matthew Exp $ -->
 
 <!--
 
@@ -71,10 +71,12 @@ foreach my $rpm (@mod_rpms) {
 }
 #
 # Look for packages which we need to be present
+my @RPMS = `rpm -q -a`;
 foreach my $rpm ('psutils','openssl-devel','perl-suidperl',
-                 'gnuplot-3.7.1-5','apache-1.3','mod_perl-1') {
-    my @RPMs = `rpm -q -a | grep $rpm`;
-    if (! @RPMs) {
+                 'gnuplot-3.7.1-5','apache-1.3','mod_perl.1',
+                 '^gzip','^zip-','^bzip2-libs','^unzip','^bzip2','^tar-') {
+    my @matching_rpms = grep(/$rpm/,@RPMS);
+    if (! @matching_rpms) {
         print "WARNING: ".$rpm." does not appear to be installed.\n";
     }
 }