my $percentage = 12.7;
my $wanted_to_charge = 100;
my $need_to_charge = $wanted_to_charge * ( 1+ $percentage/100);