--- ./scripts/script.req 2014-08-27 16:56:04.000000000 +0200 +++ ./scripts/script.req 2014-09-09 10:04:01.121011006 +0200 @@ -1,9 +1,27 @@ #!/bin/sh +ouput_perl_base() +{ + perlEV=`rpm -q --qf '%{EPOCH}:%{VERSION}\n' perl-base` + if [ $? != 0 ]; then + unset perlEV + fi + + dep=`echo "perl-base >= $perlEV"` + if [[ -n $dep ]]; then + echo $dep + fi +} + # TODO: handle "#!/usr/bin/env foo" somehow while read filename; do # common cases - sed -n -e '1s:^#![[:space:]]*\(/[^[:space:]]\{1,\}\).*:\1:p' "$filename" + INTERP=$(sed -n -e '1s:^#![[:space:]]*\(/[^[:space:]]\{1,\}\).*:\1:p' "$filename") + if echo $INTERP|grep bin/perl >/dev/null; then + ouput_perl_base + else + echo $INTERP + fi #!/usr/bin/env /foo/bar sed -n -e '1s:^#![[:space:]]*[^[:space:]]*/bin/env[[:space:]]\{1,\}\(/[^[:space:]]\{1,\}\):\1:p' "$filename" done