diff --git a/.github/workflows/dzil-build-and-test.yml b/.github/workflows/dzil-build-and-test.yml index 16e9a15c..fb4d0543 100644 --- a/.github/workflows/dzil-build-and-test.yml +++ b/.github/workflows/dzil-build-and-test.yml @@ -48,6 +48,23 @@ jobs: run: cpan-install-dist-deps && test-dist env: CODECOV_TOKEN: ${{secrets.CODECOV_TOKEN}} + # Perl development version (blead). Informational only: a red X here means the + # dist broke on the upcoming Perl (see GH#96, where it failed to install on + # blead 5.45.1). Keep this OUT of the required status checks so it never + # blocks a merge -- we want the signal, not a gate. + blead-job: + name: Perl blead (devel, non-blocking) + needs: build-job + runs-on: ubuntu-latest + container: + image: perldocker/perl-tester:devel + steps: + - uses: actions/download-artifact@v7 + with: + name: build_dir + path: . + - name: Install deps and test on blead + run: cpan-install-dist-deps && test-dist test-job: needs: build-job runs-on: ${{ matrix.os }} diff --git a/t/diag.t b/t/diag.t index 998cb66a..f0c2158c 100644 --- a/t/diag.t +++ b/t/diag.t @@ -10,7 +10,6 @@ use IO::Socket::SSL::Utils (); use Socket (); use Test::More import => [qw( diag done_testing pass subtest )]; use Test::Needs; -use Try::Tiny qw( try ); subtest 'openssl' => sub { test_needs 'Capture::Tiny'; @@ -28,18 +27,20 @@ subtest 'openssl' => sub { subtest 'net_ssleay' => sub { test_needs 'Net::SSLeay'; - try { + eval { diag( sprintf 'Net::SSLeay::OPENSSL_VERSION_NUMBER() 0x%08x', Net::SSLeay::OPENSSL_VERSION_NUMBER() ); - }; - try { + 1; + } or diag("Net::SSLeay::OPENSSL_VERSION_NUMBER() unavailable: $@"); + eval { diag( sprintf 'Net::SSLeay::LIBRESSL_VERSION_NUMBER() 0x%08x', Net::SSLeay::LIBRESSL_VERSION_NUMBER() ); - }; + 1; + } or diag("Net::SSLeay::LIBRESSL_VERSION_NUMBER() unavailable: $@"); pass('Net::SSLeay'); };