Script

felipelopesassis
(usa Ubuntu)

Enviado em 16/06/2014 - 15:08h

Boa tarde a todos! Entao, estou com um problema e peço ajuda dos feras. Nao se programar, mas acredito que pra quem sabe seja a coisa mais ridicula o que vou pedir! Coloquei aki um pedaço de uma tabela que eu tenho! Fato é que eu preciso fazer o seguinte: tenho que contar em cada linha qnts vezes aparecem as palavras Kron, Oys e Amaz, os numeros nao importam, so as palavras. E preciso colocar essa contagem nas colunas (a) (b) e (c), sendo que a mesma palavra seja colocada sempre na mesma coluna, tipo coluna (a) para Kron, (b) Oys e (c) Amaz! Nao faço isso na mao pois esse arquivo tem mais de 2000 linhas e umas 200 colunas! e tenho mais uns 20 arquivos desse! Entao, preciso de um script que possa resolver esse pepino!
Se alguem puder ajudar ficarei muito grato! Estou estudando perl e espero no futuro retribuir ajudando outra pessoa!

Abraço p todos!



(a) (b) (c)
mimiBR_COG1 Kron_R21 Kron_L102 Kron_L75 Oys_L87 Kron_L510 Kron_L14 Kron_L5
mimiBR_COG2 Amaz_L184 Oys_L195 Amaz_L195 Oys_L196 Amaz_L192 Kron_L201 Oys_L194
mimiBR_COG3 Kron_L115 Amaz_L90 Amaz_L95 Oys_L94 Kron_L110 Oys_L100 Oys_L99
mimiBR_COG4 Oys_L20 Kron_R928 Amaz_L25 Oys_R954 Amaz_R1020 Kron_L24 Kron_R977
mimiBR_COG5 Amaz_L55 Oys_L58 Kron_L70 Kron_R20 Amaz_L445 Kron_L439 Kron_R929
mimiBR_COG6 Amaz_R208 Oys_R210 Oys_R209 Kron_R215 Amaz_L70 Amaz_R253 Oys_R255
mimiBR_COG7 Amaz_R99 Oys_R104 Kron_R119 Amaz_R980 Kron_R947 Oys_R968 Amaz_L836
mimiBR_COG8 Kron_L245 Oys_L834 Amaz_L839 Kron_L814 Amaz_L241 Amaz_L847 Kron_L819
mimiBR_COG9 Kron_R242 Amaz_R237 Kron_L957 Oys_R240 Oys_R239 Kron_R241 Amaz_R238
mimiBR_COG10 Amaz_R896 Oys_R891 Amaz_R1009 Oys_R997 Kron_R458 Kron_R972 Oys_L822
mimiBR_COG11 Oys_R798 Amaz_R803 Kron_L113 Oys_L98 Amaz_L92 Kron_R788 Amaz_R810
mimiBR_COG12 Kron_L921 Kron_L922 Amaz_L961 Oys_L952 Amaz_R21 Kron_L920 Oys_R22
mimiBR_COG13 Amaz_R168 Amaz_R169 Kron_R179 Kron_R180 Oys_R173 Oys_R174 Kron_R150
mimiBR_COG14 Amaz_R1018 Oys_L1019 Oys_R1006 Amaz_L52 Kron_L52 Oys_L55 Kron_R976
mimiBR_COG15 Kron_R860 Amaz_R892 Oys_R887 Oys_R896 Amaz_R901 Kron_R867 Kron_R873
mimiBR_COG16 Amaz_R558 Kron_R541 Oys_R554 Amaz_L543 Kron_L528 Oys_L540 Amaz_R426
mimiBR_COG17 Amaz_R649 Oys_R647 Kron_R632 Kron_R631 Amaz_R648 Oys_R646 Kron_R630
mimiBR_COG18 Oys_L361 Amaz_L361 Kron_L357 Amaz_L362 Kron_L358 Oys_L362 Amaz_L363
mimiBR_COG19 Amaz_L938 Oys_L932 Kron_L905 Amaz_L290 Kron_L290 Oys_L292 Amaz_R72
mimiBR_COG20 Oys_L88 Kron_L943 Kron_R18 Oys_R14 Amaz_R999 Oys_R987 Kron_R955