Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re^8: Filter and writing error log file

by newtoperlprog (Sexton)
on Jul 24, 2014 at 10:20 UTC ( #1094922=note: print w/replies, xml ) Need Help??

in reply to Re^7: Filter and writing error log file
in thread Filter and writing error log file

Thanks Choroba for your reply.

So if I understood correctly, I should modify something like this:

if( ($seq =~/^\w{2}A\w{6}T\w{2}[ACT]\w[^A{4}|^T{4}][GC]{4}[AT]/) && ( $seq !~ /[GC]{9}/) && ( $gcper >= 30 && $gcper <= 52) ) { Do something....;}

Thanks again

Replies are listed 'Best First'.
Re^9: Filter and writing error log file
by choroba (Bishop) on Jul 24, 2014 at 10:26 UTC
    No. [^A{4}|^T{4}] is equivalent to [^^AT}|{4], i.e. it matches anything except ^, A, T, verbar, curlies and four.
    لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

      Dear Choroba, thank you for your reply.

      I am getting a little bit confused here. As '^' matches the beginning of the character and in my filter criteria position 15-19 should have atleast 3 A's or 3 T's not necessarily starts with A or T but it could be something like like:

      15-AATAG-19 15-ATAAC-19 15-TTTAC-19 15-GCAAA-19 15-GATAA-19

      Sorry for so many posts, but I really want to understand.


Log In?

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

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (5)
As of 2018-11-18 09:45 GMT
Find Nodes?
    Voting Booth?
    My code is most likely broken because:

    Results (205 votes). Check out past polls.