Subject: | no modify Storable $VERSION |
Date: | Wed, 07 Oct 2015 22:55:27 +1100 |
To: | bug-Graph [...] rt.cpan.org |
From: | Kevin Ryde <user42_kevin [...] yahoo.com.au> |
I notice the version check in 0.9703 modifies the value of
$Storable::VERSION, where I think it should not. Eg. with its 2.49_01
which comes with perl 5.20.2,
require Storable;
print Storable->VERSION,"\n";
require Graph;
print Storable->VERSION,"\n";
=>
2.49_01
2.49
I suggest something like (with undef for false if that's ok)
my $can_deep_copy_Storable = eval {
require Storable; require B::Deparse;
Storable->VERSION(2.05); B::Deparse->VERSION(0.61);
1 };
->VERSION() goes right back to 5.004 and in perl new enough to be
afflicted by underscores it uses version.pm and so copes. Personally I
think $VERSION string with underscores is not good, and dunno why a
supposed "alpha" would be included with perl itself, but VERSION()
allows that to be ignored.