$chars{$_}++ for split //, $line;