use strict;
use warnings;
use feature 'say';

use bignum;
#  (1) #use bignum downgrade => "Math::BigInt", upgrade => "Math::BigInt";
## (2) #use bigint;

say $^V;
say my $x = 21778071482940061661655974875633165533182;
say my $y = $x / 2;

##</code><code>##

v5.38.0
21778071482940061661655974875633165533182
10889035741470030830827987437816582766590

##</code><code>##

Deep recursion on subroutine "Math::BigInt::bdiv" at C:/berrybrew/strawberry-perl-5.38.0.1-64bit-PDL/perl/site/lib/Math/BigInt.pm line 2229

##</code><code>##

21778071482940061661655974875633165533182
10889035741470030830827987437816582766591