aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJulio <julio.dcs@gmail.com>2020-09-27 03:19:39 +0200
committerJulio <julio.dcs@gmail.com>2020-09-27 03:19:39 +0200
commit936f0ec5be05fa12085006670ec8ab243e520b45 (patch)
tree20ba520744574cb1e5b863ddf6239bf5a4152016
parente0136cce44281b819a7ca7ff5d098ea57202727b (diff)
downloadperlweeklychallenge-club-936f0ec5be05fa12085006670ec8ab243e520b45.tar.gz
perlweeklychallenge-club-936f0ec5be05fa12085006670ec8ab243e520b45.tar.bz2
perlweeklychallenge-club-936f0ec5be05fa12085006670ec8ab243e520b45.zip
Update ch-1.pl solution to work with bigints
-rw-r--r--challenge-079/juliodcs/perl/ch-1.pl2
1 files changed, 0 insertions, 2 deletions
diff --git a/challenge-079/juliodcs/perl/ch-1.pl b/challenge-079/juliodcs/perl/ch-1.pl
index 7118f0aa83..cf72b9f9b9 100644
--- a/challenge-079/juliodcs/perl/ch-1.pl
+++ b/challenge-079/juliodcs/perl/ch-1.pl
@@ -17,8 +17,6 @@ use experimental 'signatures';
use bigint;
use constant MODULE => 1000000007;
-use constant W_ACCURATE => 'Warning: intermediate result > Integer\'last. Result *may* not be accurate!';
-use constant E_ACCURATE => 'Error: Number cannot be > Integer\'last';
use constant E_NO_NUMBER => 'You need to submit a number';
sub length_bin($number) {