Select Code to Download

>perl -MMath::BigInt -wle "$bi = Math::BigInt->new(10); $x = $bi; $y =
+ $bi; $x->binc(); print $x; print $y; print $bi;"
11
11
11

>perl -MMath::BigInt -wle "$bi = Math::BigInt->new(10); $x = $bi; $y =
+ $bi; $x++; print $x; print $y; print $bi;"
11
10
10