$list_total_perla+= $perla;
     $list_total_perlb+= $perlb;
     $list_total_perlc+= $perlc;
     $list_total_perld+= $perld;
     $list_total_perle+= $perle;
     $list_total_perld+= $perld;