perl -e '$varA[2]="5"; $varB = $varA[2]++; print "$varB\n";'
5