$sstr=substr($str,$idx,$pl); $nu_hash{$sstr}++;