diff --git a/packages/chck_modules_version.sh b/packages/chck_modules_version.sh index 73584e087b6a5b50d779c0f02e62dd1200c488fd..072bcd0cc4e68d4974d18fbd4ae3278dbd1c871f 100755 --- a/packages/chck_modules_version.sh +++ b/packages/chck_modules_version.sh @@ -12,11 +12,14 @@ if [[ -z $1 || ! -d $1 ]]; then fi modules_file="/tmp/warden-modules.txt" -sed '/^use [A-Z]/!d; /Warden/d' `find $1 -type f` 2>/dev/null | cut -f 2 -d " " | sed 's/;//' | sort -u > $modules_file +sed '/^use [A-Z]/!d; /Warden/d' $(find $1 -type f) 2>/dev/null | cut -f 2 -d " " | sed 's/;//' | sort -u > "$modules_file" -for module in $(<$modules_file); +for module in $(< "$modules_file"); do perl -e "eval { require $module; }; if (\$@) { print \"$module: version not found\n\"; } else { print \"$module >= \$$module::VERSION\n\"}" done +# cleanup section +rm -f "$modules_file" + exit 0