rpm-php-provides

   1 #!/usr/bin/perl
   2 #####################################################################
   3 #                                                                   #
   4 # Check system dependences between php-pear modules                 #
   5 #                                                                   #
   6 # Pawe³ Go³aszewski <blues@ds.pg.gda.pl>                            #
   7 # Micha³ Moskal <malekith@pld-linux.org>                            #
   8 # ------------------------------------------------------------------#
   9 # TODO:                                                             #
  10 #####################################################################
  11
  12 die "You have to specify input files" if (@ARGV < 1);
  13
  14 $pear = "/usr/share/pear";
  15
  16 while (@ARGV > 0) {
  17         $f = shift;
  18         next unless ($f =~ /$pear.*\.php$/);
  19         $f =~ s/.*$pear\///;
  20         print "pear($f)\n";
  21 }