my ($price, $tax_rate) = split(/ /, <>); my $total_price = $price * (0.01 * $tax_rate + 1); if ($total_price =~ /^[0-9]+$/){ $total_price = $price * (0.01 * $tax_rate + 1); print "$total_price\n"; }else{ $total_price = sprintf("%.f", $price * (0.01 * $tax_rate + 1)); print "$total_price\n"; }