+perlrpm

diff --git a/.bashrc b/.bashrc
index ca689c4..8de8148 100644 (file)
--- a/.bashrc
+++ b/.bashrc
@@ -281,6 +281,7 @@ function cvs {(unset cvs;
                done
        cvs $_line $_opts "$@"
        ); }; export -f cvs
+function perlrpm { repoquery -q --whatprovides $(for i in "$@";do echo "perl($i)";done|sed -e 's/\//::/g' -e 's/[.]pm//g'); }; export -f perlrpm
 
 ulimit -S -c 0
 set +H