Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: Re: how can I speed up this perl??

by moxliukas (Curate)
on Nov 24, 2003 at 11:16 UTC ( #309495=note: print w/replies, xml ) Need Help??


in reply to Re: how can I speed up this perl??
in thread how can I speed up this perl??

According to the original code there are six diferent instances which go to the same counters. Of course this is no problem, as you can combine the counters after the solution provided by Abigail-II like this:

$counts{tt} += $counts{aa}; $counts{ag} += $counts{ct}; $counts{ac} += $counts{gt}; $counts{tg} += $counts{ca}; $counts{ga} += $counts{tc}; $counts{cc} += $counts{gg};

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://309495]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (None)
    As of 2021-10-19 01:39 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?
      My first memorable Perl project was:







      Results (76 votes). Check out past polls.

      Notices?