AOC 2022 Day 3 parts 1+2

########################################################################
#### PART 1 ####

BEGIN { prio = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"; }

{
    l=length($0)/2; split(substr($0, 1, l), ar, "");

    for (i in ar) {
        ir = index(substr($0, l+1), ar[i]);
        if (ir > 0) {
            total += index(prio, ar[i]); break;
        }
    }
}

END { print total; }

########################################################################
#### PART 2 ####

BEGIN { prio = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"; }

{
    line[NR % 3] = $0;

    if (NR % 3 != 0) { next; }

    for (i in line) {
        split(line[i], ar1, "");
        for (j in ar1) {
            ar2[ar1[j]][i+1] = 1;
        }
    }
    for (i in ar2) {
        if(1 in ar2[i] && 2 in ar2[i] && 3 in ar2[i]) {
            score += index(prio, i);
        }
    }
    delete ar2;
}

END { print score; }