use tr instead of eval on $VERSION
Karen Etheridge [Fri, 20 Apr 2018 13:13:47 +0000 (15:13 +0200)]
This way, trailing zeroes are preserved in the version. This might be
important in some cases e.g. in metadata.

lib/strictures.pm

index 5e12c82..2318aae 100644 (file)
@@ -11,7 +11,7 @@ BEGIN {
 }
 
 our $VERSION = '2.000005';
-$VERSION = eval $VERSION;
+$VERSION =~ tr/_//d;
 
 our @WARNING_CATEGORIES = grep { exists $warnings::Offsets{$_} } qw(
   closure