4 filelist=`sed "s/['\"]/\\\&/g"`
6 requires="`echo $filelist|/usr/lib/rpm/find-requires`"
7 requires_perl="`/usr/lib/rpm/perl.req $filelist`"
8 requires_mod="`rpm -q --whatprovides --qf "%{NAME}\n" $requires_perl 2>/dev/null`"
11 $requires_mod"| sort -u