From 958a003d916036a4f72aa87fa5a3d5ea2717d952 Mon Sep 17 00:00:00 2001 From: Alexander Pankoff Date: Tue, 8 Dec 2020 14:10:52 +0100 Subject: reimplement odd --- challenge-090/alexander-pankoff/perl/ch-2.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-090/alexander-pankoff/perl/ch-2.pl b/challenge-090/alexander-pankoff/perl/ch-2.pl index 51f636cc6f..eb588779f8 100755 --- a/challenge-090/alexander-pankoff/perl/ch-2.pl +++ b/challenge-090/alexander-pankoff/perl/ch-2.pl @@ -30,5 +30,5 @@ sub ethopian_mul_chain ( $a, $b ) { } sub odd($x) { - $x != ( ( $x >> 1 ) << 1 ); + $x & 1; } -- cgit