my $split1 = (($energy_before[$j]-$energy_rebin[$k])*$totcount)/($energy_before[$j]-$energy_before[${j}-1]);