use warnings;
#use Tk;

print "result:\n";
$_A = '16.25'; # string, not number
$_V = '12.99'; # string, not number
$formula = 'sprintf("%.0f", ($_V * $_A))';
$_W = eval($formula);

print "$_V\n";
print "$_A\n";
print "$_W\n";