#!/usr/bin/perl

use Math::BigInt ':constant';

$discount = 15;
$price = "109.98";

print $discount * $price;

exit();