Select Code to Download

for my $i (0..$#vals){
 $tot_mem[$i]=$vals[$i][1]?$vals[$i][1]:0;
}