$char += $1 ? 0 : defined $2 ? length $2 : length $3;