use v5.16; # my $input = <>; my $input = "25 16"; chomp $input; my ( $yukicoda, $tax ) = split / /, $input; my $add_tax = $yukicoda * ( $tax / 100 ); say int( $yukicoda + $add_tax );