$ct = $ct + scalar(@arr);
# or
$ct += @arr;