[PERL] - frekvence znaku

mam soubor (txt) a potrebuju zjistit pocet vyskytu jednotlivych pismen v souboru. nemate nekdo myslenku jak to v perlu udelat?

Vzhleem k tomu ze perl ma asociativni pole tak snad to neni problem ne?

Ctes znaky a inkrementujes danou bunku, jako klic slouzi dane pismeno.

Kdyz tak neco uz je tu
http://perlmonks.thepen.com/64842.html
Akorat misto <STDIN> nahodis vstup ze souboru.

Citace:

---

Původně odeslal jedik

Vzhleem k tomu ze perl ma asociativni pole tak snad to neni problem ne?

---

IMHO na toto vubec nepotrebuje pouzivat asociativni pole, kdyz potrebuje zjistit vyskyty pismen. Staci si vytvorit pole intu o velikosti 256 a postupne ctes pismeno po pismenu pricemz inkrementujes promennou v poli o indexu pismene.

Citace:

---

Původně odeslal hpcpg

Citace:

---

Původně odeslal jedik

Vzhleem k tomu ze perl ma asociativni pole tak snad to neni problem ne?

---

IMHO na toto vubec nepotrebuje pouzivat asociativni pole, kdyz potrebuje zjistit vyskyty pismen. Staci si vytvorit pole intu o velikosti 256 a postupne ctes pismeno po pismenu pricemz inkrementujes promennou v poli o indexu pismene.

---

Samozrejme ze nemusis, je to sumafuk, proste jiny postup.