[PERL] - frekvence znaku

[Braindead]

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

[jedik]

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.

[hpcpg]

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.

[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.