engineering/un-inception
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix: skip Perl lint when modules missing instead of failing

Browse source
This commit is contained in:
russell@unturf.com 2026-02-07 19:41:08 -05:00
parent 35bbd37877
commit 2b8be2388d
1 changed files with 15 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

16
scripts/science/lint-all-sdks.sh
View file

@ -88,7 +88,21 @@ fi
# Perl SDKs # Perl SDKs
echo "Perl SDKs:" echo "Perl SDKs:"
if command -v perl &>/dev/null; then if command -v perl &>/dev/null; then
lint_sdk "perl-sync" "perl -c '$CLIENTS_DIR/perl/sync/src/un.pl'" "$CLIENTS_DIR/perl/sync/src/un.pl" # perl -c loads modules which may not be installed, so check for missing module errors
PERL_OUTPUT=$(perl -c "$CLIENTS_DIR/perl/sync/src/un.pl" 2>&1)
PERL_EXIT=$?
if [[ $PERL_EXIT -eq 0 ]]; then
echo " [PASS] perl-sync"
PASSED=$((PASSED + 1))
DETAILS="$DETAILS\n <testcase name=\"perl-sync\" classname=\"lint\" />"
elif echo "$PERL_OUTPUT" | grep -q "Can't locate"; then
echo " [SKIP] perl-sync - missing Perl modules (LWP::UserAgent, etc.)"
else
echo " [FAIL] perl-sync"
echo " $PERL_OUTPUT" | head -3
FAILED=$((FAILED + 1))
DETAILS="$DETAILS\n <testcase name=\"perl-sync\" classname=\"lint\"><failure message=\"Lint failed\">$PERL_OUTPUT</failure></testcase>"
fi
else else
echo " [SKIP] Perl not installed" echo " [SKIP] Perl not installed"
fi fi