| Subject: | use of LWP->Version() |
https://metacpan.org/source/CLAESJAC/Crypt-NSS-0.04/t/10-lwpcompat-setisa.t#L12
Instead, use UNIVERSAL's own VERSION...
diff --git a/t/10-lwpcompat-setisa.t b/t/10-lwpcompat-setisa.t
index b0fd409..b4858dd 100644
--- a/t/10-lwpcompat-setisa.t
+++ b/t/10-lwpcompat-setisa.t
@@ -9,11 +9,12 @@ use Crypt::NSS config_dir => "db", cipher_suite => "US";
use LWP;
use Net::HTTPS;
-if (LWP->Version < 5.819) {
- plan skip_all => "LWP 5.819 or later required";
+my $ver_ok = eval {LWP->VERSION("5.819");};
+if ($ver_ok) {
+ plan tests => 1;
}
else {
- plan tests => 1;
+ plan skip_all => "LWP 5.819 or later required";
}
-is($Net::HTTPS::ISA[0], "Net::NSS::SSL::LWPCompat");
\ No newline at end of file
+is($Net::HTTPS::ISA[0], "Net::NSS::SSL::LWPCompat");