You don't need to load your whole file into memory, especially not twice (if I understand correctly your code). Simply read your file line by line, count your aninoacids on the current line and then go to the next line and continue the coun ting. This way you'll have no memory problem counting elements even in GB files. One small additional point: 
if($j!=/^>/)

[download]
I am not exactly sure what you intend there, but it probably does not do what you want. Also: 
    if(exists $count{$_})
    {
        $count{$_}++;
    }
    else
    {
        $count{$_}=1;
    }

[download]
can be replaced simply by: 
$count{$_}++;

[download]

In reply to Re: Count the occurrence of an element in an array by Laurent_R
in thread Count the occurrence of an element in an array by rocketperl

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.