This is an automated email from the git hooks/post-receive script.
ppm-guest pushed a commit to annotated tag v0.17
in repository libmath-prime-util-perl.
commit be6502f6255e31d8c870a1244c0084c2ba227786
Author: Dana Jacobsen <d...@acm.org>
Date: Wed Dec 19 23:41:09 2012 -0800
Silence perl critic for expression eval
---
bin/primes.pl | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/bin/primes.pl b/bin/primes.pl
index 988e0f4..8ba5e7e 100755
--- a/bin/primes.pl
+++ b/bin/primes.pl
@@ -538,7 +538,7 @@ sub eval_expr {
$expr =~ s/:1/nth_prime/g;
$expr =~ s/:2/log/g;
$expr =~ s/(\d+)/ Math::BigInt->new($1) /g;
- my $res = eval $expr;
+ my $res = eval $expr; ## no critic
die "Cannot eval: $expr\n" if !defined $res;
$res = int($res->bstr) if ref($res) eq 'Math::BigInt' && $res <= ~0;
$res;
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git
_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
