#!/usr/bin/perl -w
#
# Demo program to illustrate the usage of the Math::BigInt module
#
# Usage: bigint.pl
#
use Math::BigInt;

my $rsult;

my $str_x = '75180531028023';
my $str_y = '84401';
my $str_z = '10000';

my $x = Math::BigInt->new($str_x);
my $y = Math::BigInt->new($str_y);
my $z = Math::BigInt->new($str_z);

$result = $x->bmuladd($z,$y);

print "$result\n";