diff options
| -rw-r--r-- | challenge-079/juliodcs/perl/ch-1.pl | 2 |
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) { |